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4.0 uses logical 
units for separate 
compilation 


Pascal 4.0 lets you 
break up the code gang into 
“units,” or “chunks.” These 
logical modules can be 
worked with swiftly and 
separately—so that an 
error in one module is 
seeable and fixable, and 
you re not sent through all 
your code to find one error. 
Compiling and linking these 
separate units happens in a 


flash because your compil- 
ing horsepower is better 
than 27,000 lines a min- 
ute.* And 4.0 also includes 
an automatic project Make. 


4.0’s cursor 
automatically lands 
on any trouble spot 


4.0's interactive error 
detection and location 
means that the cursor 
automatically lands where 
the error is. While you're 
compiling or running a 
program, you get an error 
message at the top of your 
screen and the cursor flags 


the error’s location for you. 


4.0 gives you an 
integrated program- 
ming environment 


4.0’s integrated environ- 
ment includes pull-down 


menus and a built-in editor. 


Your program output is 


Please check box(es) Sugg. Retail Upgrade Pricet Serial No. 
O Turbo Pascal 4.0 Compiler $ 99.95 $ 39.95 
O Turbo Pascal Tutor 69.95 19.95 
O Turbo Pascal Database Toolbox 99.95 29.95 
O Turbo Pascal Graphix Toolbox 99.95 29.95 
O Turbo Pascal Editor Toolbox 99.95 29.95 
O Turbo Pascal Numerical Methods Toolbox 99.95 29.95 
O Turbo Pascal Gameworks 99.95 29.95 
Total product amount $ 
CA and MA residents add sales tax $ 


In US please add $5 shipping and handling for 


each product ordered 


Outside US please add $10 shipping and 
handling for each product ordered 


Total amount enclosed 
Please specify diskette size: 
Payment: 
Credit card expiration date: __._——_/ 


Oo 514” 0 3” 





$ 
$ 


O VISA OMC O Check O Bank Draft 


card* Ltt titty tt rttypytyyy y 


tTo qualify for the upgrade price you must give the serial number of the equivalent product you are upgrading. 
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automatically saved and 
shown in the output 
window. You can Scroll, 
Pan, or Page through all 
your output and know 
where everything is all the 
time. Given 4.0’s integra- 
tion, you can edit, compile, 
find and correct errors—all 
from inside the integrated 
development environment. 


You'll never lose your 
mind, because 4.0 
never loses your place 


Whenever you re-load 4.0, 
it remembers what you and 
it were doing before you 
left. It puts you right back 
in the editor with the same 
file and in the same place 
as you were working last. 


*Run on an 8 MHz IBM AT. 

*“*lf within 60 days of purchase this product does not perform in 
accordance with our claims, call our customer service department, 
and we will arrange a refund. 


All Borland products are trademarks or registered trademarks of 
Borland International, Inc. Other brand and product names are 
trademarks or registered trademarks of their respective holders. 
Copyright © 1987 Borland International, Inc. BI 1159A 








record used by Intr ana MsDos 


= record 
case Integer of 
0: (AN, BX, GX. DX) BP,SI,DI,DS,ES,Flags: 


tt: (AL; AH, BL, BH; CL, CH, DL, DH: Byt€@) > 
end; i 


> and untyped-file record } 


record 
Handle: Word; 
Mode: Word; 
RecSize: Word; 
Private: array{1i..i26);: of 
UserData: array{1..16} 
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Program in the 
fast lane with 
Borland’s new 
Turbo Pascal 40. 





The fast lane is fas 


ur new Turbo 

Pascal® 4.0 is so 

fast, it's almost 
reckless. How fast? 
Better than 27,000 lines 


of code per minute. That's 


much faster than 3.0 or 
any other Pascal compiler 
and the reason why you 
need 4.0 today. 


Pascal. The fastest 
and the best. 


If you're just now 
learning a computer lan- 
suage, learn Pascal. If 
you re already program- 
ming in Pascal, you're 
programming with a 
winner because Pascal is 
the worldwide language 
of choice. Pascal is the 
most popular language 
in university computer 
science classes and with 
computer enthusiasts 


structure. It’s powerful, 
coherent, easy to learn 
and use—and with Turbo 
Pascal 4.0—faster than 
ever before. 


Turbo Pascal: 
Technical excellence 


Commitment to tech- 
nical excellence and 





superiority also means 
commitment to detail, 
however painstaking, and 


decessor, Turbo Pascal 
3.0 is the worldwide 
standard, and with Turbo 
Pascal 4.0, we've bet- 
tered that standard. 4.0 is 
clearly the world’s fastest 
development tool for the 
IBM® PS/2 series, PC’s 
and compatibles—and the 
world’s favorite Pascal 
compiler. 


4.0 breaks the 
code barrier 

No more swapping 
code in and out to beat 
the 64K code barrier. 
Designed for large pro- 
crams, Turbo Pascal 4.0 
lets you use all 640K 
memory in your compu- 
ter. You paid for all that 
memory, now you can 
use it freely. 


For the IBM PS/2 and the IBM and 


that takes time. 4.0's pre- 


Compag families of personal computers 


who appreciate Pascal's | 
and all 100% compatibles. 


modern programming 
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1... I want to upgrade to Turbo Pascal 4.0 


YE S @ and the 4.0 Toolboxes 


Registered owners have been notified by mail. If you are a registered Turbo Pascal user and 
have not been notified of Version 4.0 by mail, please call us at (800) 543-7543. To upgrade if 
you have not registered your product, just send the original registration form from your manual 
and payment with this completed coupon to: 





Pascal 4.0 Upgrade Dept. Name 

Borland International 

4585 Scotts Valley Drive Ship Address 

Scotts Valley, CA 95066 City | State 
Zip__—CCC Telephone ( D ceccemteeeieeeteniorerenemntees 


This offer is limited to one upgrade per valid registered product. It is good until June 30, 1988. Not good with any other offer from Borland. 
Outside U.S. make payments by bank draft payable in U.S. dollars drawn on a U.S. bank. CODs and purchase orders will not be accepted by Borland. 
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Nows the time 
for a fast decision: 
Upgrade now to 4.0! 


Compatibility with = Interactive error 


Turbo Pascal 3.0 detection/location 
We've created 4.0 to = Includes a command line 


be highly compatible with version of the compiler 


version 3.0 and included a 4.0 also 
conversion program and = Saves output screen in a 
compatibility units to help window 
you convert all your 3.0 . tea ao and 50 
ines per screen 
programs to 4.0. = Generates MAP files for 
; debugging 
paseo of = Has graph units including 
Orland Ss new CGA, EGA, VGA, MCGA, 
Turbo Pascal 4.0 3270 PG, AT & T 6300 & 
Hercules support 
5 Compiles 27,000 lines = Supports extended data 
per minute types (including word, long 
= Supports >64K programs integers 
= Uses units for separate = Does smart linking 
compilation = Comes with a free revised 
= Integrated development MicroCalc spreadsheet 


source code 
4.0 is all yours for only $99.9 


Sieve (25 iterations) 


Turbo Pascal 4.0 
2224 bytes 


environment 











Sieve of Eratosthenes, run on an 8MHz IBM AT 


Since the source file above is too small to indicate a difference in compilation speed we compiled our GOMOKU program from Turbo Gameworks to give 
you a true sense of how much faster 4.0 really is! 


Compilation of GO.PAS (1006 lines) 









Turbo Pascal 4.0 Turbo Pascal 3.0 
2.2 seconds 3.6 seconds 
27,436 | 16,750 





60-Day Money-Back Guarantee** 





For the dealer nearest 
you or to order call 


(800) 543-7543. 
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Interlocking Pieces: 
Blaise and 
Turbo Pascal. 


Whether you're a Turbo Pascal expert or a novice, you can benefit from using professional tools 
to enhance your programs. With Turbo POWER TOOLS PLUS™ and Turbo ASYNCH PLUS.” 
Blaise Computing offers you all the right pieces to solve your 4.0 development puzzle. 


Compiled units (TPU files) are provided so each package is ready to use 
.. with Turbo Pascal 4.0. Both POWER TOOLS PLUS and ASYNCH PLUS 
<i st ‘use units in a clear, consistent and effective way. If you are familiar 
with units, you will appreciate the organization. If you are just getting 
started, you will find the approach an illustration of how to construct 
and use units. 


@POWER TOOLS PLUS is a library of over 180 powerful functions 
and procedures like fast direct video access, general screen 
handling including multiple monitors, VGA and EGA 50-line 
and 43-line text mode, and full keyboard support, including 
the 101/102-key keyboard. Stackable and removable win- 
dows with optional borders, titles and cursor memory 
» provide complete windowing capabilities. Horizontal, ver- 
F tical, grid and Lotus-style menus can be easily incorporated 
into your programs using the menu management routines. 
You can create the same kind of moving pull down menus 
I that Turbo Pascal 4.0 uses. 


Control DOS memory allocation. Alter the Turbo Pascal heap 

size when your program executes. Execute any program from 

_ within your program and POWER TOOLS PLUS automatically 

compresses your heap memory if necessary. You can even force 
. the output of the program into a window! 


Write general interrupt service routines for either hardware or 
software interrupts. Blaise Computing’s unique intervention 
code lets you develop memory resident (TSRs) applications 
- that take full advantage of DOS capabilities. With simple pro- 

® cedure calls, “schedule” a Turbo Pascal procedure to execute 
either when pressing a “hot key” or at a specified time. 


" @ASYNCH PLUS provides the crucial core of hardware interrupts 

needed to support asynchronous data communications. This package offers 
simultaneous buffered input and output to both COM ports, and up to four 
ports on PS/2 systems. Speeds to 19.2K baud, XON/XOFF protocol, hard- 
ware handshaking, XMODEM (with CRC) file transfer and modem control 
are all supported. ASYNCH PLUS provides text file device drivers so you 
can use standard “ReadIn” and “Writeln” calls and still exploit interrupt-driven 


communication. 


The underlying functions of ASYNCH PLUS are carefully crafted in assembler 
and drive the hardware directly. Link these functions directly to your application 
or install them as memory resident. 


Blaise Computing products include all source code that is efficiently crafted, 
readable and easy to modify. Accompanying each package is an indexed 
manual describing each procedure and function in detail with example 
code fragments. Many complete examples and useful utilities are 
included on the diskettes. The documentation, examples and 
source code reflect the attention to detail and commitment to 
technical support that have distinguished Blaise Computing over 
the years. 


Designed explicitly for Turbo Pascal 4.0, Turbo 
















































the right combination of pieces to put your Turbo Pascal Enclose n 
puzzle together. Complete price is $129.00 each. 4 Pie dd S 
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Full spectrum of general servi 


tions including: windows; r 


_ resident applications; interrup 
- tines; intervention code; and « 
~ access for fast screen handling. For” 


‘CTOOLSPLUS 


‘Windows: menus; ISRs; interven nt 


screen handling and EGA 43-line te 
support; direct screen access, S fi 


dling and more. Specifically 


BLAISE COMPUTING INC. Cece ; 


“Microsoft C 5.0 and QuickC. 


POWER TOOLS PLUS and Turbo ASYNCH enna cond me the TIS ae 
PLUS provide reliable, fast, professional routines — § YES! %€ a —— nore inform? 
m 





See a Date-—— 


—< - CONRNES ee 


ARTICLES 






Extending LISP p> 


tf ng Sad Soe tae and et Bill 
1 Bev describe flexible new structures called Topics that 
e knowledge-ba: d system designers the ee of both | 
ertext and declarative larfguages. 
‘The | Provin ; Using Semantic Resolution 
"by Anthony . J. Dos hes 
or ee of you ) propositional logic, Aoi offers 
_worki for eae with “mechanical” — 
theorem proving.  . _ 


i y as They ae oe an AI 


oe oe — __| Cliche, but we replied, “Hey, we 
: ae ROOM _ 136 | ™ay be April fools, but we're 
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- Products examined from the pregrauhner: S perspective. This. 
- ionth: Version 2. o of the Brief editor, Guideline’ sC+4,and. 
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| fluid. 










Next Issue 

May will see a number of 
changes in DDJ, including a 
new column on “Programming 
Paradigms.” The issue focus is 


-_ | on developing applications 
by Stan Krute - ___| from a number of perspectives, 
_ Updates on QUED™M, i ON, ¢ ad HFS Navigator, as well as | 


. _| as well as the usual surprises. 
. code for a HyperCard : yuting Toolkit. 
Modula-2 p> | One 
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The Powerful New 





_ PROGRAMMER’S PARADISE PRESENTS 


SoftCode- 


SoftCode — Available exclusively from Programmer's Paradise and the Software Bottling Company. 







SoftCode is a new program generator that’s 
based on the idea that you should never have to 
write the same program twice. And that’s no small 
idea! Because if you're like most programmers, 
75% of your time is spent rewriting and modifying 
the same old code to go into new programs. 


SoftCode, the most powerful screen editor 
available today, is packed with features that deliv- 
er fast results. Draw boxes, change colors, move 
blocks around, place fields and more. Then let 
SoftCode generate your program ... Automatically. 


The unique template language allows you to 
instruct SoftCode to generate any kind of program 
in your own personalized style and in your own 
language. 


To get started, SoftCode includes a set of 
pre-written templates for complete data entry 
routines. You choose the language: BASIC, C, 
Pascal, or dBASE. 


Additional Templates are available at the 
Programmer's Paradise low price of $45.00. 


Introductory Price $109 


List $129 






Flash-Up enhances every C 
program...without writing a sin- 
gle line of code. Just use the 
RAM resident window editor to 
“draw” menus and help windows 
into any program. 





Think of Flash-Up as a full keyboard macro 
utility, a help note annotator and a menu maker 
rolled into one to help you do things that could 
never be done before. Like making smart menus 
that send keyboard macros. And automatically 
attaching them to your programs with “electronic 
glue” and even adding mouse support to all 
your programs. 


List $89 Special $75 


Also try Flash-Up Developers Toolbox. You 
get the Programming Language Interface anda 
royalty-free routine module. Imagine controlling 
keyboard macros and smart windows by sending 
commands from any programming language! And 
including them free in every program you 
distribute. 
List $49 
List $49 


Special $45 


Special FREE 
(with purchase of Flash-Up) 


See why Flash-Up and the Toolbox were 
nominated for PC Magazine's Technical Excellence 
award for 1987/1988. 
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LIST OURS 


TURBO PASCAL ADD-ONS 

ASCII TURBO GHOST WRITER 
STARTER NEW 99 89 
COMPLETE NEW 289 259 
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Programmer’s Paradise Gives You Superb Selection, 
Personal Service and Unbeatable Prices! 


Welcome to Paradise. The microcomputer software source that caters to your programming needs. 
































Discover the Many Advantages of Paradise... AZATAR DOS TOOLKIT NEW 99 85 
© Lowest price guaranteed ® Huge inventory, immediate shipment ® Special orders PaSiP ee 8 
® Latest versions ® Knowledgeable sales staff ® 30-day money-back guarantee  METRABYTE DATA ACQ. TOOLS eee 
. ° 3 ° SYSTEM BUILDER 150 129 
Over 500 brand-name products in stock —if you don’t see it, call! iMPEX 10089 
REPORT BUILDER 130 115 
2 T-DEBUG PLUS V. 4.0 SPECIAL 45 39 
4 | | AY la) . ° W/SOURCE NEW 90 79 
e atc ny Nationally vertise rice. TURBO. ASM 99 69 
: RE ee TURBO GEOMETRY LIBRARY NEW 100 39 
100 
LIST OURS LIST OURS LI TURBO HALO 99-85 
386 SOFTWARE C LIBRARIES FILE MANAGEMENT OE ee TURBO MAGIC 99 89 
386-TO-THE-MAX NEW 75 65 C ASYNCH MANAGER 175 135 BTRIEVE 245 185 TURBO POWER TOOLS PLUS 129-99 
ADVANTAGE 386 C OR PASCAL 895 829 C-FOOD SMORGASBORD 15095 XTRIEVE 245 189 TURBO POWER UTILITIES 95 79 
DESQVIEW 130 109 C TOOLS PLUS/5.0 129 99 REPORT OPTION 145 109 TURBO PROFESSIONAL 4.0 99 79 
FOXBASE + 386 595 CALL C UTILITY LIBRARY 185 125  BTRIEVE/N 595 455 TURBO WINDOW/PASCAL 9 79 
HIGH C-386 NEW 895 835 ESSENTIAL COMMUNICATIONS 185 125 XTRIEVE/N 595 459 
MICROPORT SYSTEM COMMUNICATIONS PLUS 250 189 REPORT OPTION/N 345 269 SCREENS/WINDOWS 
V/386 (COMPLETE) 799 679 GREENLEAF C SAMPLER 95 69  CBTREE 159 139 C-SCAPE 279-265 
MS WINDOWS/386 SPECIAL 195 = 125 GREENLEAF COMM LIBRARY 185 125 C-TREE 395 315 CURSES W/SOURCE CODE 250 169 
NDP C OR FORTRAN-386 NEW 595 545 GREENLEAF FUNCTIONS 185 125 R-TREE 295 239 GREENLEAF DATA WINDOWS 225 155 
PHARLAP 386/ASM/LINK 495 419 MULTI-C 149 135 C-TREE/R-TREE BUNDLE 650 519 W/SOURCE CODE 395.259 
SCO XENIX SYS V 386 (COMPLETE) 1495 1195 PFORCE 295 215 D-TREE NEW 395 CALL __HI-SCREEN XL 149119 
VM/386 SPECIAL 245 179 RESIDENT C W/SOURCE 198 169 DBCIII 250 169 JYACCFORMAKER 495 449 
X-AM 595 535 TIMESLICER SPECIAL 295 269 DBC III PLUS 750 595 JYACC JAM 750 «679 
TURBO C TOOLS 129 99  DB_VISTA OR DB_QUERY 195 CALL MICROSOFT WINDOWS 9965 
ARTIFICIALINTELLIGENCE SINGLE USER W/SOURCE 495 CALL MSWINDOWSDEVELOPMENTKIT 500 319 
ARITY STANDARD PROLOG 95 79 COBOL MULTIUSER PANEL PLUS SPECIAL 495 389 
MULISP-87 INTERPRETER 300 199 E-Z PAGE 295 259 MULTIUSER W/SOUR 320 CALL PANEL/QC OR /TC 129 99 
PC SCHEME 95 85 MICRO FOCUS INFORMIX pent ae nt UL Gare SCREENSTAR W/SOURCE 198 169 
TURBO PROLOG 100-69 COBOL/2 900 729 ACER A CALE VITAMING SPECIAL 225 149 
TURBO PROLOG TOOLBOX 100 «69 ee ee Ole ae 708 ea) ~—s VC SCREEN 99 79 
ASSEMBLERS/LINKERS LEVEL II COBOL 349 279 = FORTRAN COMPILERS WINDOWS. FOR DATA 298 CALL 
ADVANTAGE DISASSEMBLER 295 279 ee COBOL ne . ie LAHEY FORTRAN FI7LEM/16 ; 695 625 W/SOURCE 590 CALL 
7 
OPTASM SM BLER NEW 193 169 MICROSOFT COBOL 700 "449 MICROSOFT FORTRAN 450 285 ADDITIONAL PRODUCTS 
PASM86 195 115 MICROSOFT SORT 195 129 RM/FORTRAN 595 479 ADVANTAGE VCMS 379 329 
PLINK86PLUS 495 279 OPT-TECH SORT 149 105 BASTOC 495 399 
REALCICS 995 785 §FORTRANLIBRARIES/UTILITIES 
BASIC REALIA COBOL 995 785 | DIAGRAM’ERORDOCUMENT’ER 129 
DB/LIB 139 408 W/REALMENU 1145 899 | GRAFMATIC OR PLOTMATIC 135 
FINALLY! 99 89 RM/COBOL 950 759 MAGUS NUMERICAL ANALYST 295 
FLASH-UP SPECIAL 89 75 RM/COBOL-85 1250 999 = MATHPAC an 
MACH 2 75. 88 RM/SCREENS 395 315  SPINDRIFTLIBRARY SPECIAL 149 
QUICKPAK 69 59 COMMUNICATIONS GRAPHICS 
QUICKWINDOWS W/SOURCE 99 89 ASCOM IV 195 175 | ADVANTAGE GRAPHICS (C) 250 
TRUE BASIC 100 »=—-79 CARBON COPY PLUS 195 159 | ESSENTIALGRAPHICS 250 
TURBO BASIC 100 «69 CO-SESSION (2 USER) NEW 249 225 — GSSGRAPHIC DEV. TOOLKIT 495 
TURBO BASIC TOOLBOXES 100 ~—-69 SUPPORT NEW 175 155 ~~ ~HALO 300 
APPLICATION NEW 125 115  HALO(5 MICROSOFT LANG.) 595 
PTEL 50 45 METAWINDOW PLUS 275 
SIDETALK 120 89 | TURBOWINDOW/C 95 
DEBUGGERS TURBO HALO (FOR TURBO C) 99 
ets eer ADVANCED TRACE-86 175 119 MODULA-2 
ee PERISCOPE! SPECIAL 345 269 LOGITECH MODULA-2 
riae PERISCOPE II SPECIAL 175 135 COMPILER KIT 99 
Pe PERISCOPE III 8 MHZ SPECIAL 995 789 DEVELOPMENT SYSTEM 249 
BUSSE PERISCOPE III10MHZ SPECIAL 1095 869 TOOLKIT 169 | 
a PFIX 86 PLUS SPECIAL 395 199 soLIDB+ TOOLBOX NEW 99 89 DAN BRICKLIN’S DEMO PROGRAM 75 59 
“MOUSE _ DISK/DOS/KEYBOARD UTILITIES STONYBROOK MODULA-2 195 169 195 155 
ADD Poe, ) ADVANCED NORTON UTILITIES 150 9 W/UTILITIES wee eS oan ae 
ES2W/PLUS =§- 99_—s—s“gW9 COMMAND PLUS NEWV.2.0 80 69 = QBJECT-ORIENTEDPROGRAMMING MAGIC PC 195 179 
RBUSMOUSE 150 9 DISK OPTIMIZER 70 65 ACTOR 495 419 MKS TOOLKIT 139 115 
 : $38 22 43s ADVANTAGE C + + 495 479 MKSRCS NEW, SPECIAL 189 169 
IMSWINDOWS == 200 NORTON COMMANDER 75 55 PFORCE++ 395 215 y4Ks-sops “NEW 495 469 
MOUSE BUS W/PNT & POPUPS 179 PC TOOLS DELUXE NEW 80 69 SMALLTALK/V 100 85 Naan GUIDES 100 «6B 
‘MOUSE SER. W/PNT & POPUPS 1 PDISK 145 = 105 SMALLTALK/V286 NEW 200 169 pCTINT SPECIAL 13998 
UMMAMOUSE ssi“ tk aT VFEATURE 805 APPLICATION PACKS 50 45 pOLYMAKE 149 129 
- ——____—___— EDITORS POLYTRON PVCS CALL CALL 
C COMPILERS BRIEF 195 CALL MICROPORT oY VATS 549 469 PRE-C 295-159 
LATTICE C 500 269 W/DBRIEF 275 CALL SCO XENIX SYSTEM V 1295 995 SOURCE PRINT 95 75 
MICROSOFT C 450 285 EMACS 295 265 WENDIN-DOS 99 79 TREEDIAGRAMMER 77 ~—«69 
QUICK C SPECIAL 99 65 EPSILON 195 149 OTHER MICROPORT SCO 
TURBO C 10065 on ap eee WENDINPRODUCTS CALL CALL 
1 
C INTERPRETERS MULTI-EDIT NEW 99 89 PASCAL COMPILERS 
C-TERP 298 229 PC/EDT 250 229 MICROSOFT PASCAL 300 189 
INSTANT C 495 379 PMATE 195 115 PASCAL-2 259 CALL 
120 79 SPF/PC 245 185 TURBO PASCAL 100 69 


BORLAND ADD-ONS CALL CALL 


RUN/C 
RUN/C PROFESSIONAL 250 155 VEDIT PLUS 185 129 TURBO PASCAL DEV.LIB. 395 289 
aitiaa DN 
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Sizing Up Microsoit 


t's been said from time to time 

that Dr. Dobb’s has a love/hate 
relationship with a little software 
company up in Washington state, a 
company you may have heard of. 
Some people who read the maga- 
zine often think we're biased in the 
company’s favor because we men- 
tion it so often, or because we ha- 
ven't published a scathing indict- 
ment of the bugs in one of their 
compilers (lately). Other people, who 
presumably don't talk to the folks i 
the first camp, charge that we spend 
too much time covering Micro- 
softian developments and urge that 
we spend more time covering (fill in 
the name of your favorite product 
category). 

While there seems to be almost a 
tradition of Microsoft “bashing” 
the industry, that’s not what's going 
on here. What's really going on is 
that the company has grown so 
much in the last few years that we're 





all becoming victims of shifting Tod 


digms. Although it may be hard f 
us (especially the old-timers) to ap- 
preciate, there’\ no escaping it: If 
you're a seriou\ developer in the 
personal computer marketplace, you 
have to analyze Microsoft's products 
and strategies and how that im}\cts 
your products and plans. Often what 
means reading both for what was 
said, and what wasn’t; analyzing 
both for tactics and strategy. 

Which brings us to the point of 
this little essay: For most develop- 
ers, Microsoft's role can be seen to- 
day as primarily of strategic rather 
than tactical importance. Increas- 
ingly, the details of specific announce- 
ments are becoming less important 
than strategic concerns. 

Case in point: OS/2. It took years 
to develop—big companies move 
slowly—and it'll take years for the 
new generation of applications to 
appear. But despite the tactical op- 
portunity for other operating sys- 
tems to penetrate the market (in 
relatively small numbers), the strate- 








gic reality is that OS/2 will undoubt- 
ably prevail in the coming years un- 
less IBM pulls the plug. OS/2's vic- 
tory will have little to do with tech- 
nical merit, and everything to do 
with the incredible resources of Mi- 
crosoft and IBM. OS/2 is the Ada of 


personal computer operating sys- | 


tems: less attractive than other op- 
tions, but massive and impossible 
to assail. 


In reflecting on this state of sir ' 


you might be disappointed, like 
many of us, that Microsoft's strategy 
ignores the 386 market. It is ironic 
that most of the scheduled accep- 
tance of OS/2 will occur in a year or 
more, just when (rumors say) we'll 
all be hip-deep in 386 machines, but 
this just further emphasizes the stra- 
tegic choices developers have. You 
can take the safe route and write 
applications for OS/2, or consider all 
those 386 machines crying for new 
software. A great deal ofpycerestul 
386 software is being “vritten ‘by 
small companies, by people who are 
able to respond quickly to changing 
market conditions. 

And finally, there are times when 
it’s to everyone’s benefit to have a 
big company leading the way. Micro- 
soft’s involvement in CD-ROM is a 
perfect example. The company’s ex- 
tensions for MS-DOS are an impor- 
tant tool for everyone, but the most 
important concern right now is mak- 
ing CD-ROM viable. In a market dead- 
locked with the hardware compa- 
nies are waiting for the software com- 
panies and vice versa, Microsoft has 
taken the laudable step of continu- 
ally pushing ahead with GD-ROM 
products and_ support. } Which 
means we all might get to reap the 
benefits of CD-ROM before the turn 
of the century—presumably even 
those of us running MS-DOS as a 
task under a 386 version of Unix. 
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From real time embedded 
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commercial applications on 
Macintosh, IBM PC, Amiga, 
Atari, and others, Aztec C has 
earned a well-deserved reputa- 
tion as an innovative, tough to 
beat, rock-solid C development 
system. 


But don’t just take our word for 
it—try it yourself. We know that 
the best way to understand what 
puts you ahead with Aztec C is 
to use it. That's why Aztec C 





systems purchased directly from 
Manx come with a 30-day, no 
questions asked, satisfaction 
guarantee. Call for yours today. 


We can also send you informa- 
tion that details the special fea- 
tures and options of Aztec C. 
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ware, extended technical sup- 
port options, and all of the 
Services and specialized sup- 
port that you may need when 
you're pushing your software to 
the limits and... beyond. 
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other formats 

© source for UNIX run time library 

® processor dependent features 

© source for startup 
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@ UNIX vi editor 
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RUNNING LIGHT 


A: my friend Ezra Shapiro has 
pointed out, when it comes to 
Artificial Intelligence in personal com- 
puter software, we've still got a long 
way to go. For all our simulations of 
neural nets and expert systems, our 
machines still seem woefully inade- 
quate in reasoning power. Today 
someone told me about an ad- 
vanced communications package 
that recognizes when it’s been in- 
voked without being configured and 
actually prompts the user for the 
information it needs. While I acted 
suitably impressed, I couldn't help 
wondering why the _ program 
couldn’t check the hardware, access 
a database containing parameters 
and phone numbers, and furnish 
the user with a list of assumptions 
for approval. It could be that I just 
expect too much; the program my 
friend described is apparently con- 
sidered a fairly sophisticated pro- 
gram by his peer group. 

Yes, Ezra, still we have a long way 
to go. 

DDJ readers, as a class, probably 
have less road to travel than other 
programmers. This issue, after all, 
has a couple of articles designed to 
stimulate your interest in expanding 
what we commonly describe as Al 
languages. As we investigated arti- 
cles for this issue, I discovered that 
for many people the line between 
AI languages and “ordinary” lan- 
guages has blurred. For Bill and Bev 
Thompson, authors of “Topics in 
Knowledge-Based Languages,’ (page 
40 in this issue), and authors of 
KnowledgePro, KnowledgeMaker, 
and MicroExpert, the distinction is 
no longer relevant to their work— 
they do most of their expert system 
work in an extended version of Pas- 
cal. Their article demonstrates that 
real world problems often require 
more flexibility from the language 
(and by extension the programmer) 
than you'd expect from the stan- 
dard AI discussion. After talking it 
over for hours, Bev said, they'd had 


to admit that whatever you do, the 
program will eventually be trans- 
lated into binary, and they've de- 
cided they no longer ‘believe’ in Al 
languages, per se. 

While on the subject of unbeliev- 
able things, you'll probably want to 
check out Edward Yourdon’s news- 
letter, American Programmer. The 
premier issue just arrived and de- 
scribes the publication as “dedicated 
to casting a caustic eye on the Ameri- 
can software scene.” It certainly 
does that! While Yourdon’s perspec- 
tive is a little more MIS oriented 
than many of us prefer, the newslet- 
ter is filled with perceptive commen- 
tary and intelligent discussion of 
such topics as the economics of the 
DP industry, and the issues of pro- 
grammer productivity and costs. 

One of the more startling fore- 
casts in the premier issue is what 
Yourdon admits a rash prediction, 
the thesis that “the American pro- 
grammer is about to go the way of 
the dinosaur and the dodo bird.” 
Yourdon is talking here about pro- 
grammers in the corporate environ- 
ment, and he has a substantial body 
of facts and figures to buttress his 
thesis that foreign competition is 
about to do for programmers what 
it did for the American auto worker 
a few years back. 

Obviously, at a charter subscrip- 
tion rate of (only) $295, this newslet- 
ter is not for the casual program- 
mer. But a subscription for the com- 
pany library would be a sound in- 
vestment. It’s good to be occasion- 
ally reminded that there are larger 
issues than the product announce- 
ments, advertisements, and reviews 
that many industry publications 
dwell on. 


a 
a. 


editor 
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Ten Years ago in DDJ 

“A company which claims it is ready 
to manufacture and sell truly intelligent 
household androids, or robots, within the 
next two years—to the tune of $4,000 
apiece—has the nation’s artificial intel- 
ligence experts up in arms. The experts 
unanimously state that the claims are 
fraudulent. The company, Quasar 
Industries located in Rutherford, NJ, is 
currently touring shopping centers 
around the country with a model of an 
android which they claim comprehends 
4,000 words of vocabulary and can 
vacuum, wash dishes, and teach the kids 
French. Crowds in the sundry depart- 
ment stores are dazzled, according to 
numerous press reports. This robot is a 
fake, according to scientists from Carnegie- 
Mellon University in Pittsburgh, PA. The 
scientists recently undertook a first-hand 
investigation of the matter and found the 
robot to be a “radio-controlled puppet.” 
Stanford University News Release, “Et Tu 
Klatu?’’—“Letters,”. DDJ, February 1978. 


Just another arty fact 
“After all, the strange fact about AI has 
always been that it’s easier to simulate 
an expert than to simulate the general 
common sense of a five-year-old.’— 
Michael Doherty, DDJ, June 1984. 


It’s always so code in here! 

“DDJ is important as a journal because 
of the code. It was started to publish 
code and it has always published code. 
It publishes more code than any other 
magazine. And its still my belief that 
people [programmers] learn from reading 
other people’s code. 

What they learn, of course, is how to 
program well: they pick up tricks, 
insights, algorithms, all of which are 
particularly well expressed when 
presented in a form in which they will 
ultimately be realized: as code. We hope 
to go right on publishing useful and 
educational code, including both 
programs significant in themselves and 
bits of code that demonstrate some 
exemplary algorithm or _insight.’’— 
Michael Swaine, DDJ, February 1985. 
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ve! Introducing Turbo C 1.5— 
the best optimizing compiler 
sets even better! 


The professional 
optimizing compiler 
for less than $100 

Turbo C® is a techni- 
cally superior produc- 
tion-quality compiler. 
(Borland’s equation sol- 
ver, Kureka™, is written in 
Turbo C.) And our Turbo 
C 1.5 offers a new library 
of the highest presenta- 
tion-quality graphics in 
the industry—the kind 
you Il see in Quattro,” 
our new professional 





Actual photograph of Turbo C graphics displayed on IBM 8514 screen.” 


spreadsheet. | 
And spectacular graph- ° Jext/video functions, ° Sample graphics 
ics are just part of the including windows applications 
brand-new features. e 43- and 50-line mode ¢ More than 100 new 
Turbo C 1.5 enhance- Support functions 
ments also include: ¢ VGA, CGA, EGA,. Hercules, For professional-quality C 
and IBM 8514 support at an affordable price, no one 


¢ A professional-quality 
graphics library of over 
70 functions 


¢ A librarian that allows you = => 
to build your own object 2 YF Ss = 


module libraries SSS SS 

¢ Context-sensitive help for For the dealer nearest 
the language and the BO RLAME you or to order, call 
library routines (800) 543-7543 


Minimum system requirements: For the IBM PS/2” and the IBM® and Compaq® families of personal computers and all 100% compatibles. PC-DOS (MS-DOS®) 2.0 or later. 384K. 

“Artwork metafile courtesy of Genigraphics® Corporation 

“Customer satisfaction is our main concern; if within 60 days of purchase this product does not perform in accordance with our claims, call our customer service Gepartment, and we will arrange a refund. 

All Borland products are trademarks or registered trademarks of Borland International, Inc. Other brand and product names are trademarks or registered trademarks of their respective holders. Copyright ©1987 Borland International, Inc. Bi 11658 


¢ File search utility (GREP) else comes close to Turbo C. 
Because no one can deliver 
technical superiority like 
Borland. 


60-Day Money-back Guarantee ** 
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It's easy to upgrade to Turbo C 1.5! 
Just complete this coupon and mail it with payment before June 30, 1988. Or, call us at (800) 543-7543 and be ready to give our operators your name, 
credit card number, and the serial number on your Turbo C master disk. 
Please specify diskette size O 5%" O 3%” 








Turbo C 1.5 Upgrade Price $ 33.90 Method of Payment: O VISA O MC O Check O Bank Draft 
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In US $5.00 (Outside US add $10) oe eo tata A a Se ee 
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Must include your Turbo C serial #_-_EEEE 
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C manual along with your payment by March 31, 1988 and receive your Turbo C 1.5 Cit State 
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One Language For \ 


BB* 
Specifications: 


Ease-of-use—BB* is the fastest, 
most powerful development tool 
available for business oriented 
program creation. Programmers 
can write code in minutes. 
Execution time—BB*'s partially 
compiled format provides enhanced 
execution speed. 

Easy Maintenance—BB* is an 
interactive programming language, 
with a trace facility and a full 
screen editor which makes 
program maintenance a snap. 


Portability—BB* runs under UNIX 
and other operating systems without 
recompilation. 

Compatibility—BB* is an enhance- 
ment of the Business Basic 
language, an industry standard, 
giving you access to thousands of 
applications. 
Supportability—Program mainte- 
nance utilities and complete 
documentation save considerable 
time and money. It lets you build 
and support applications easily. 


Utiliti2zs—A complete set of BB* 
utilities are provided for program 
and file management. 


Conversion—A complete set of 

conversion utilities are provided 

with every BB* package. 

Features 

Math Functions 

* 14 place precision and 
computational accuracy 

* Floating point conversion 

* Task specified rounding precision 

* Binary to decimal conversion 

* Long function names 

* Dynamic array’s 

String Functions 

* Numeric to string conversion 

* String manipulation 

* No string length restriction 

!/O Functions 

* Windowing 

* 1/O mnemonics 

= Device independent verbs 

* X,Y cursor addressing 

* Masking 

* Soft key loads 

* No record length restrictions 


* BB* file limit size is the size of the 
media which they reside 


File Structures 
* INDEX 
* KEYED 


» MKEYED 

= SERIAL 

* SORT 

«= PROGRAM 

» STRING 
System Structure 


* Multi-tasking - which provides 
record and file level locking 


» Program overlay 
Public programming which 


provides: 
- Local variables 
- Dynamically called sub- 
programs 
- Argument passing 
- Automatic public program drop 
from memory at exit 
- Public program in memory 
lock option 
Language Structure 
= Interactive program development 
* Online syntax checking 
* Compound statements 
* User defined functions 
« Unlimited nesting 
« Remote 1/O lists 
* Program self modification 
« Case insensitive console mode 
* Various debugging tools 
BBX Utility Set 
* File Browse 
* Create Data Bundle 
* Calculator 
= Clear Workspace 
» Program Compare 
= Copy File 
= Define/Redefine File 
= Directory Listing 
» Erase File 
= Generate Filelist 
» Program List/Cross Reference 
= Move File 
» Program Renumbered 
« Rename File 
« File Resizer 
Execute O/S Shell Command 
Search and Replace Program 
Color & FUNC Key Setup 
Time/Date Examine/Set 
* Utility Menu 
« Visual Utility Interface 


= BXSND/BXRCV conversion 
utilities 


Its portability crosses all 
operating environments, and 
now its performance is crossing 
all oceans. 

Around the world, the 
industry’s best and brightest 
programmers are discovering the 
astonishing power that BB* 
brings to Business BASIC. Write 
your program once, and have com- 
plete movement to MS/PC-DOS, 
OS/2, XENIX-UNIX and VMS. 

This year, over 50,000 copies of 
BB* are performing throughout 
the United States, Canada, 
Europe, Asia and South 
America. 

Commitment to innovation, 
development within industry 
standards and technological 
leadership have grown BB* 
around the globe. 

In 1988, aggressive marketing 
and uncompromising customer 
support will continue to 
compliment our success, and 
expand the BB* standard among 
many of the world’s most 
respected companies. 

Get in touch with one of our 
world distributors, and feel the 
pulse of the power of BB*! 


BB* PROGRESSION/2 is available for Intel Based Computers, Altos 


, ICL, Motorola, Nixdorf Prime, 


Die Portabilitat schlagt samt- 
liche, bisher bekannte und unbe- 
kannte, EDV-Emgebungen. Die 
Leistung iiberzeugt inzwischen 
die gesamte EDV-Industrie. 

Weltweit entdecken die besten 
Software-Entwickler die 
erstaunliche Leistung von BB", 
mit der Business BASIC bereichert 
wird. Die Anwendungen werden 
nur einmal entwickelt und laufen 
ohne Anderungen oder 
Anpassungen auf MS/PC-DOS, 
OS/2, XENIX-UNIX, AIX, IX370 
oder VMS. 

Mehr als 50.000 BB*Lizenzen 
stellen die Leistung in den USA, 
Canada, Europa, Asien und 
Sid-Amerika unter Beweis. 

Zur Innovation nach Industrie- 
Standard Spezifikationen 
verpflichtet, und mit dem Ziel 
nach technologischer Fuhrung, 
wachst BB* um die Welt. 

Mit aggressivem Marketing 
ohne Kompromisse im Bereich 
Kundenservice, wird der Erfolg 
von BB* in 1988 fortgesetzt. 

Es steht auf samtlichen Systemen 
namhafter Computerhersteller 
zur Verfiigung und stellt seine 
Akzeptanz bei den 
anspruchvollsten Anwendern 
unter Beweis. 

Kontaktieren Sie unsere 
Vertretungen in aller Welt. 
Entdecken Sie die Schlagkraft 
von BB*! 


, Data General, Digital Equipment, Fortune, 


Pyramid, Rexon, 


Instruments, Unisys, and the IBM family of products. BASIS i iio Sanyo, Sequent, Siemens, Texas 


ding new systems. 


Portable, il franchit tous les 
cadres d’opération, et sa 
performance traverse, maintenant, 
tous les océans. 

Dans le monde, les meilleurs 
et le plus brillants programmeurs 
de l'industrie découvrent 
l’étonnante puissance que BB” 
ameéne au BASIC des affaires. 
Ecrivez votre programme une 
seule fois, et accédez totalement 
a MS/PC-DOS, a OS/2, a 
XENIX-UNIX et a VMS. 

Cette année, plus de 50 000 
copies de BB* fonctionnent aux 
Etats-Unis, au Canada, en 
Europe, en Asie et en Amérique 
du Sud. 

Un esprit constant d’innovation, 
un développement conforme aux 
normes de I’industrie, et une 
position de leader dans le 
domaine technologique, tels sont 
les atouts qui ont contribué 4 la 
croissance de BB* dans le monde 
entier. 

En 1988, un marketing 
dynamique et un appui 
inconditionnel a notre clientéle 
continueront a couronner notre 
réussite, et a étendre le standard 
BB* a de nombreuses sociétés 
parmi les plus respectées au 
monde. 

Contactez l’un de nos 
distributeurs mondiaux et 
découvrez la puissance de BB"! 


BB* PROGRESSION/2, BB* and BASIS Incorporated are trademarks and/or services marks of 
BASIS Incorporated, Albuquerque, New Mexico. All references to computer systems and software 
products contained within this advertisement recognize the trade and/or services marks of the 
corresponding manufacturer and holder of the trade and/or service mark. 


Su portabilidad traspasa todos 
los medios de operacién y ahora 
su funcionamiento esta cruzando 
todos los océanos. 

Los mejores y mas brillantes 
programadores del mundo, estan 
descubriendo la as@mbrosa poten- 
cia que BB* ofrece al negocio 
P4SIC. Escriba su programa una 
viii y tenga movimiento completo 
a MS/PC-DOS, OS/2, 
XENIX-UNIX y VMS. 

Este ano, 'mas de 50,000 copias 
de BB* estan funcionando en 
Estados Unidos, Canada, 
Europa, Asia y América del Sur. 

Empeno de inovacion, 


| desarrollo eh los estandards de la 


industria y superioridad 
tecnolégica han hecho crecer a 
BB* en todo\el mundo. 

En 1988, mercadotecnia 
agresiva y abe Be tants a 
nuestros clientes seguiran 
complementando el exito y 
desarrollo de BB” entre las 
companias mas respetadas del 
mundo. 

Comuniquese con uno de 
nuestros distribuidores mundiales 
y sienta la potencia de BB*! 
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Correcting our Pointers 
Dear DDJ, 

I could not bear to let Clyde Schech- 
ter’s letter, Optimum Performance?, 
in the January 1988 issue go unan- 
swered. It will leave young C pro- 
grammers very confused about both 
multidimensional arrays and point- 
ers. 

Apparently Mr. Schechter has a 
two-dimensional array confused 
with an array of pointers. The defini- 
tion: 


int ary[10)[10] 


reserves storage for 100 integers, and 
the storage is quite contiguous. If 
the storage is not contiguous, then 
the concepts of pointer arithmetic 
and scaling in the C language have 
been built on faulty ground. The 
variable ary is an ‘array of 10 point- 
ers, each containing 10 integers.” 
The element ary/0//10] is the same 
element as ary/1/[0]. No pointer vari- 
ables have been created. The expres- 
sions ary, aryl0], and so on are all 
pointer constants. As pointer con- 
stants their values cannot’ be 
changed, meaning that they cannot 
appear on the left of an assignment 
expression. Rows’ cannot’ be 
swapped by swapping pointers, as 
Mr. Schechter implies. The distinc- 
tion between pointer constants and 
pointer variables is fundamental to 
fully understanding the C language. 

I think the definition he describes 
is: 


int *ptrary[10] 


ptrary is “an array of 10 pointers to 

















integers.” The storage for the point- 
ers has been reserved, but the point- 
ers have not been initialized. The 
storage to which they point is not 
yet present. Dynamic memory allo- 
cation can be used to obtain differ- 
ent amounts of storage for 10 differ- 
ent arrays, and each pointer can be 
set to reference one of the arrays. 
Now the pointers (array elements) 
can be exchanged. 

Your readers should understand 
the difference between these next 
two expressions. ary/1/[2) references 
element (1 * 10) + 2, element num- 
ber 12, (the 13th element counting 
from zero), of array ary. ptrary[1][2] 
references element number 2 (the 
third element) of the array pointed 
to by element number 1 (the second 
element) of array ptrary. The scale 
of each row of ary is 10, while the 
scale of the rows of ptrary is un- 
known. 

In support of Mr. Schechter, this 
topic is one of the most confusing 
aspects of the language. In C by 
Design, the college level textbook 
which I am co-authoring, we de- 
cided to devote one full chapter to 
discussing arrays, and another to 
discussing pointers. It required that 
much space to explain these sub- 
jects. I hope that this letter provided 
an adequate overview, and thanks 
for letting me express this opinion. 

George Defenbaugh Jr. 

Tulsa, OK 


Your points are well taken, and you 
were not alone in your concern. We'd 
planned to have a reply from the 
author, Richard Relph, but last min- 
ute changes in the January issue pre- 
vented that. —Ed. 


Poor Richard’s Revenge 
Dear DDJ, 

One of the other editors here at 
BYTE pointed out Tyler Sperry'’s arti- 
cle in your January 1988 issue, “386 
v. 030: The Crowded Fast Lane.” I 
was inexplicable drawn to that arti- 
cle—maybe you can guess why. 

In his article, Tyler summarized 
the conclusions I came to in my 
September 1987 BYTE article (in 
which I benchmarked a number of 
80x86 and 68xxx machines). To 





quote his summary: “If you have 
some experience with benchmarks 
(or if you read BYTE regularly), you 
can anticipate what he [meaning: 
me] found: the 80386 outperformed 
the 68020 in the majority of tests.” 

I'm not sure how Tyler deduced 
that, but he’s flat wrong. My article 
said: “Overall, it appears that—and I 
know I'll catch a lot of flak for this— 
the 80386 machines outperform the 
68020 machines. Of course, the rea- 
son for this could well go beyond 
the possibility [my emphasis] that 
one processor is simply faster than 
the other.’ Nowhere have I made 
the claim that the 80386 processor 
performs better than the 68020. I’m 
surprised that Tyler interpreted ‘the 
80386 machines...” as “... the 80386 
processor...” My article was an at- 
tempt to reveal aspects of perform- 
ance of systems based on proces- 
sors, not an attempt to isolate proc- 
essor performance. 

Further down, Tyler states (in ref- 
erence to the benchmark tests I ran): 
“. these tests were performed with 
the intent to test mathematical per- 
formance. The only nonmathemati- 
cal tests were the infamous Sieve 
and a quicksort routine.” 

I've got to throw a flag on that one 
as well; check out two of the other 
tests I ran: Dhrystone and Fibon- 
acci. Dhrystone is not a purely mathe- 
matical benchmark. It contains a 
mix of operations that involve indi- 
rect addressing, comparisons, array 
operations, and string manipula- 
tions. Nor would I consider Fibon- 
acci’s only goal to test math opera- 
tions; it's main objective is to test 
the instructions involved in recur- 
sion. 

All in all, Tyler’s article was right 
on. I couldn't agree more with many 
of his “lessons.” I’ve always admired 
the work DDJ has done, you people 
put out one of the finest computer 
magazines around. Keep it coming, 
and the other BYTE editors and I 
will keep reading it. (Just ask Tyler 
to read BYTE more carefully next 
time.) 

Richard Grehan 

BYTE Magazine 

Peterborough, NH 
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Stunning speed. Unmatched performance. Total flexibility. Simple 
and intuitive operation. The newest VEDIT PLUS easily satisfies 
the most demanding computer professional. 


The free demo disk is fully functional—you can try all features 
yourself. Best, the demo includes a dazzling menu-driven tutorial 
—you experiment in one window while another gives instructions. 


The powerful “macro” programming language helps you eliminate 
repetitive editing tasks. The impressive demo/tutorial is written 
entirely as a “macro— it shows that no other editor’s “macro” lan- 
guage even comes close. And VEDIT PLUS is only 40K in size. 


Go ahead. Call for your free demo today, You'll see why VEDIT 
PLUS has been the #1 choice of programmers, writers and engi- 
neers since 1980. 


The installation lets you pick from closely emulating the keyboard 
layout of Word Perfect, WordStar and others. Or you can easily 
create your own layout and even your own editing functions. Sup- 
ports any screen size—you pick screen colors and attributes. 


Supports the IBM PC, XT, AT and PS/2. Also supports MultiLink, 
PC-MOS/386, Concurrent DOS and most networks. Also avail- 
able for MS-DOS, FlexOS (protected mode), CP/M-86 and CP/M. 
(Yes, we support windows on most CRT terminals, including CRTs 
connected to an IBM PC.) Order direct or from your dealer. $185. 


Special: VEDIT (single file, no windows) for CP/M—$49. 


Bio aut as 


VEDIT and CompuView are registered trademarks of CompuView Products, Inc. BRIEF is a trademark 
of UnderWare, Inc. PMATE is a trademark of Phoenix Technologies Ltd. Norton Editor is a trademark 
of Peter Norton Computing Inc. MultiLink and PC-MOS/386 are trademarks of the The Software Link, 
Inc. CP/M and FlexOS are trademarks of Digital Research. MS-DOS is a trademark of Microsoft. 


‘Also available for Tl Professional, Tandy 2000, DEC Rainbow, Wyse WY700 and others. 
“Demo disk is fully functional, but does not readily write large files. 
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Call 1-800-45-VEDIT for 
FREE Fully Functional Demo Disk 









e Fully Network Compatible 
e Call for XENIX-286 version 
e 30 Day Money-back guarantee 
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BRIEF Editor PMATE 

‘Off the cuff macros No No Yes 
Built-in macros Yes No Yes 
Keystroke macros Only1 No No 
Multiple file editing 20 + 2 No 
Windows 20 + 2 No 
Macro execution window No No No 
Pop-up menus No No No 
Execute DOS commands Yes Yes Yes 
Automatic processing of 

Compiler errors Yes No No 






“Cut and paste” buffers 1 1 1 














Undo line changes Yes No No 
Paragraph justification No No No 
Convert to/from WordStar No No No 
On-line calculator No No No 
Configurable Keyboard Hard No Hard 
43 line EGA support Yes No No 
Manual size/index 250/No 42/no 469/Yes 
Benchmarks in 120K File: 

2000 replacements 1:15 min 34sec 1:07 min 
Pattern matching search 20sec Cannot Cannot 
Pattern matching replace 2:40 min Cannot Cannot 
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LETTERS 
(continued from page 12) 


Author Tyler Sperry replies: 
Regarding your first point, I must 
apologize. As you point out, even 
though your article compared 386 
and 020 systems you clearly warned 
your readers that the results could 
not be extended categorically. (Al- 
though it could be argued this is 
exactly what most of your readers 
wanted.) As the later paragraphs of 
my piece made clear, both of us 
agree on this point. Apparently, my 
left brain took a vacation during the 
proofing and missed the gaff. 

As to the benchmarks, I must con- 
fess that characterizing the Dhry- 
stone benchmark as “mathematical” 
was a mistake. The single aspect of 
the Dhrystone is the strcmp func- 
tion—it can affect compiler bench- 
mark performance by as much 30 
percent—and comparing strings 
isn't what most of us _ consider 
“mathematical.” My mistake with 
the Fibonacci benchmark was a sin 
of omission; I consider the Fibon- 
acci to be virtually worthless as any- 
thing other than a quick-and-dirty 
test for the way a compiler handles 





procedure calls, and perhaps I 
should have spelled this out. 

Despite these minor points, I 
think we agree on the broad issues. 
It’s a pity we have to rely on bench- 
marks for comparisons of systems— 
or CPUs. 


Dynami« Linking Revisited 
Dear DDJ, 

Congratulations on giving OS/2 some 
decent coverage in the December 
issue of DDJ. 

However, Dave Cortesi’s article 
(“Dynamic Linking in OS/2,”) did con- 
tain one little flaw. He asserts that 
DLL s cannot be written in high level 
languages because of the require- 
ment that SS=DsS. In fact, Microsoft 
C has a switch especially to tell the 
compiler not to assume DS=SS, and 
Microsoft uses C to write many of 
the DLLs that are supplied with OS/2 
and Windows. 

Ray Duncan 

Ex-member of the 

Happy DDJ Family 

Marina del Rey, CA 


Early attempts at lambda calculus. 
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Dear DDJ, 

I appreciate your article describing 
the dynamic linking mechanism in 
OS/2. One minor correction, though. 
The current C compiler for OS/2 (at 
least the IBM and the Microsoft of- 
ferings) can indeed generate code 
for dynamic libraries. One must use 
the —Au and -Gs options. The —Au 
(usually -Alfu for large model) gener- 
ates code for SS!=DS. Admittedly 
not all library modules are available 
(in particular the V/O library), but 
one can write shared code in C. 
With the —Au option the compiler 
generates a save and load for DS for 
each procedure. —Gs suppresses 
stack checking. 

Also, a quick comment on your 
enthusiasm about the 80386. Yes, it 
is indeed a wonderful processor. But 
both OS/2 and the VM systems (Win- 
dows/386, Desqview and others) fail 
to fully exploit the chip. While the 
VM systems’ value comes from com- 
patibility with existing applications 
(not a minor point), they do not 
otherwise allow applications to ex- 
ploit the processor. To fully exploit 
the native mode (also called pro- 
tected mode) the path that OS/2 pro- 
vides has the longterm advantage. 
Obviously, a merger of the two ap- 
proaches is needed. 

Robert Frankston 

(via CompuServe) 


Author Dave Cortesi responds: 
Duncan and Frankston are correct; 
both Microsoft C 5.0 and IBM C/2 
support the —Au option. That gener- 
ates code at every function's entry 
to save DS and load it with the 
selector for the data segment gener- 
ated for the module, and code to 
restore the caller's DS on exit. As 
Frankston notes, the —-Gs option elimi- 
nates the check on stack depth, and 
that eliminates the commonest 
source of link-time references to un- 
wanted library procedures. 

These options are, however, pecu- 
liar to the particular compilers. The 
IBM Pascal/2 and comparable Micro- 
soft Pascal compilers do not have 
them, and other C compilers might 
or might not. And while the features 
help, they don't fill all the potholes 
on the road to dynamic linking. 


(continued on page 142) 
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The POLYTRON Version Control System (PVCS) 
simplifies and automates Configuration Manage- 
ment so programmers and managers can effectively 
control the revisions and versions of source code. 
PVCS is the most widely used change control 
product and is used by the leading software, 
aerospace, manufacturing and service companies. 


“In terms of features, PVCS pro- 
vides everything necessary to a 
large multi-programmer project — 
more than any other package 
reviewed. No restrictions are placed 
in the development environment 
and all aspects of operation can be 
customized for specific project 
needs. ”” 


PC Tech Journal 
September 1987 


Unmatched Flexibility 


¢ Storage & Retrieval of Multiple Revisions of Source Code 
¢ Maintenance of a Complete History of Changes 

¢ Control of Separate Lines of Development (Branching) 
¢ Resolution of Access Conflicts 

¢ Optional Merging of Simultaneous Changes 

© Release and Configuration Control 

¢ Project Activity Reports 

¢ Management Reports 

¢ Command or Menu Interface 


Project Control 


PVCS maintains individual archieves of all project 
components in your system — source code 
modules, data files, documentation and even ob- 
ject code libraries. These “source documents” can 
be written in any language or multiple languages. 


Fast Retrieval of Revisions 


PVCS uses “reverse delta storage” which saves disk 
space and speeds retrieval of versions of any file in 
the project database. A delta is the set of differences 
between any revision and the previous revision. 
PVCS can rapidly recreate complete versions of any 
file whether it is the most recent revision of a 
module or the original version of the entire project. 
Differences are automatically detected and stored. 
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cal Necessity for LANs 


While important for single-programmer projects, 
PVCS is absolutely essential for multiple-program- 
mer projects and LAN-based development efforts. 
In a LAN environment, source code files are simply 
too easy to change. Because any change to any file 
can have major ramifications, coordinating and 
keeping a record of changes is critical. Project 
leaders can determine, on a module-by-module 
basis, which programmers can access or modify 









Once you standardize on PVCS, the archives 
used to track and monitor changes are inter- 
changeable between any PVCS product. 


Personal PVCS — Offers most of the power and 
flexibility of Corporate PVCS, but excludes the 
features necessary for multiple-programmer 
projects. 


Corporate PVCS — Offers additional features to 
maintain source code of very large and complex 
projects that may involve multiple programmers. 
Includes multi-level branching to effectively main- 
tain code when programs evolve on multiple 
paths. 


Network PVCS — Extends Corporate PVCS for 
use on Networks. File locking and security levels 
can be tailored for each project. 


PVCS for VAX systems — Requires VMS. Uses 
the same interface and archive format as MS- 
DOS version. Supports branching and offers file 
locking and other security features for multiple- 
programmer projects. 














source files, libraries, object code and other files. 
The levels of security can be tailored to meet the 
needs of nearly every project. PVCS works on all 
major LANs including 3Com, Novell and the IBM 
Token Ring Network. 


“PVCS has helped us maintain nearly 
90 programs and utilities. Without it 
we would not have the quality of our 
upcoming release of NetWare.” 


Jonathan Richey 
Manager, NetWare Utilities 
Novell 


Adopt PVCS on Your Existing Projects 


You can obtain the benefits for your current pro- 
ject without disrupting development, regardless of 
how long your project has been under way. You can 
build PVCS archives from revisions stored in your 
present files or simply adopt PVCS from the cur- 
rent date. 


PolyMake Reads PVCS Logfile Format 


PolyMake, the leading Make utility, understands 
the structure of PVCS logfiles and is able to correctly 
determine the date and time of any revision. This 
prevents unnecessary operations that occur when 
the date and time of the complete project archive 
itself is used as with other make utilities. 
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**5 Station LAN License. Call for pricing 
on larger Networks. 


TO ORDER: 
1-800-547-4000 
Dept. DDJ 
Oregon & Outside USA call (503) 645-1150. 
Send Checks, PO.s to: POLYTRON 
Corporation, 1700 NW 167th Place, 
Beaverton, OR 97006 
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Texas Instruments has 
system developers need. 
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“Personal Consultant™ Plus ee offers | | aka Consultant Plus 3.0 Standard Features 


— Frames, rules, meta rules and procedures 
— Forward/backward chaining 


a very fine expert system development | - a wastes 


— End-user explanation facilities 


d d li l h al d h — Graphics image capture and display 
and delivery tool that already nas ~ Interaces to dBase", Lotus 2-3, DOS fies, 


— Complete LISP development environment 


a proven record with end-users.” = mena exenddetended memory suppor 


— Context sensitive help 
— “Getting Started” tutorial-style manual 


— Susan Shepard, AI Expert 
ores Personal Consultant Images 

— Optional add-on package to PC Plus (3.0) 

— Allows integration of “active images” into 














— Interactive dials, gauges, forms and selection 
— Multiple images can be combined on same 


— “Getting Started” tutorial-style manual 


- Personal Consultant Online 
ional add-on package for PC Plus 
LINE expert systems that interact 


- - _ Multiple interfaces to data acquisition and 
analysis programs ies 
— Knowledge base synchronization with process 


— Functions for historical and predicted trends 
ecial user interface/reporting capabilities 
etting Started” tutorial-style manual 





what serious expert 
Power tools. 


Amon all the expert system devel- 
opment tools available for personal 
computers today, none deliver the 
power and flexibility of TI’s Personal 
Consultant series. 

Personal Consultant Easy is ideal for 
getting started, and is upwardly com- 
patible with the higher functionality of 
PC Plus. For experienced developers, 
Personal Consultant Plus and its 
optional add-on enhancements, Online 
and Images, were designed to help solve 
a broader range of complex problems. 


| PC PLUS 


, meta r 


Personal Consultant Plus. Full power 
for an affordable price. 

At $2,950, PC Plus has proven to be 
one of the richest and most flexible 
problem-solving tools available for the 
development of complex knowledge- 
based systems. Designed to take 
advantage of today’s more powerful 
286/386 DOS-based computers, or TI’s 
Explorer™ Symbolic Processing System, 
the new 3.0 version of PC Plus provides 
powerful standard features and a contin- 


uing growth path with the addition of 
either PC Images or PC Online, or both. 


Personal Consultant Images. Picture 
an expert system with interactive 
graphics. 

At $495, PC Images enables developers 
to create knowledge-based applications 
that incorporate complex graphical 
“active images.” User-interactive dials, 
gauges, forms and selection images pro- 
vide a more exciting visual data input 
and output style. 


Personal Consultant Online. The 
expert system as part of the process. 
At $995, PC Online allows the devel- 
oper to design expert systems which 
interact directly with process data, as 
opposed to input from a human oper- 
ator. Designed for intelligent process 
monitoring applications, this optional 





package helps deliver expertise that is 
“online all the time.” 


Application delivery as flexible as the 
tools themselves. 

Delivery can be in LISP for flexibility, 
or “C”* for maximum speed and porta- 
bility. Our “C” options support either 
stand-alone or “embedded” knowledge 
bases. Options are available for DOS- 
based PCs, TI’s Explorer, and DEC’s 
VAX™ line of multi-user minis running 


under VMS™. 





“Texas Instruments has done more 
than any other company to educate 
people about AI, to popularize it, and 
to make useful AI tools available at 
reasonable prices.” 

— Jim Seymour, PC Magazine. 


Technical support, training courses and 
Knowledge Engineering Services are 
available for the Personal Consultant 
products. If you have a question about 


_ any of our expert system power tools, we 


have the answer. 


Pick up the phone and gain a powerful 
advantage. 

Call 1-800-527-3500 for technical 
overviews of our products and a PC Plus 
case histories brochure which details 
how our power tools are being put to 
work today. 


36106 
© 1987 TI 
Personal Consultant and Explorer are trademarks of 
Texas Instruments Incorporated. 
dBase is a trademark of Ashton- Tate. 
Lotus 1-2-3 is a trademark of Lotus Development Corp. 
VAX and VMS are trademarks of Digital Equipment Corporation. 
* Available 4Q 1987. 
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Creating an 
Adventurous 
Language 





by Jonathan Amsterdam 


stumble upon the source code for the original Crowther-Woods Adventure program. It 

was a gut-wrenching display of nonmodularity run rampant. Except for the text of the 
messages and the network of room interconnections, the entire game, from the properties of 
rooms and objects to the movements of the bear, troll, pirate and dwarves, was coded right into 
the program. 

I'm sure I wasn’t the first to be goaded by this horror into designing a special-purpose 
language for writing adventure games. But mine differs from others I have seen in its attempt to 
combine the best of three different programming styles into a single, unified, Adventure 
Authoring Language, AAL. In this article, I describe AAL (pronounced simply “‘Al’”), emphasizing 
the roles of the programming styles that comprise it and their implementation challenges. 7 

The programming styles used in AAL all arose from artificial intelligence (AI) research of the 
1960s and 70s. Today, each style is typified by a single programming language. The core of AAL 
involves deductive retrieval from a database of facts and rules, as popularized by the logic 
programming language PROLOG. AAL borrows the idea of inheritance from object-oriented 
languages such as Smalltalk for describing the objects of adventure games. And the list- 
manipulation abilities, syntactic freedom, and general-purpose power of LISP make it the ideal 
language for implementing AAL. 

First, I'll supply an overview of AAL, to give you an idea of how these aspects of the language 
are realized. Then I'll discuss the programming styles in slightly more detail. Finally, I'll consider 
some key points of implementation. Because of space limitations, I won't be able to describe all 
of AAL or its implementation. 


W:« browsing around my local computer system not long ago, I had the misfortune to 


Overview of AAL 

AAL is designed for writing text adventure games in which players move from location to 
location and manipulate objects by typing brief commands. AAL maintains the state of a 
running game in a list of facts called the database. Portions of AAL programs can query the 


Jonathan Amsterdam is a graduate student at MIT’s artificial intelligence laboratory. He has 
articles published in several magazines, and may be reached at 617-253-7881. 
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CREATING AAL 
(continued from page 19) 


database to find out about the current state and can add 
(assert) and delete (retract) facts to change the state. 
Facts are represented by lists of symbols; the fact (in keys 
house) could mean that the keys are in the house. 

Patterns are used to query the database. A pattern is 
like a fact but may contain variables, which in AAL begin 
with an asterisk. A pattern matches a fact if all the 
constants are identical; the result of a match is to bind 
the variables in the pattern to the corresponding con- 
stants in the fact. So, for example, the pattern (in *x 
room) matches (in bear room) with *x bound to bear but 
does not match (in bear house) because room and house 
are not equal. 

AAL programs cause actions to happen in the adven- 
ture game by examining and modifying the database 
using rules. The rule: 


((at lamp *x) (on lamp) —> (lit *x)) 


says that if the lamp is at a location *x, and the lamp is 
on, then *x is lit. Rules consist of zero or more antece- 
dents (patterns to the left of the ->) and one or more 
actions or consequents. If all the antecedents match the 
database, then the actions are taken. Variables appearing 
in the actions have the same values that they were 
bound to when the antecedents were matched. 

Rules can be combined into rule lists, which act like 
nested if. . then. . elses. The rule list: 


(((Carrying player rod) —> “The bird is frightened”’) 
((not (carrying player cage)) —> “You can't Carry it”’) 
(—> (take player bird))) 


specifies what happens when the player tries to take the 
bird in the original Adventure. If the player is carrying 
the rod, the message “The bird is frightened” is printed 
and nothing else happens. If the player is not carrying 
the cage, the message “You can’t Carry it’ is printed. If 
neither of these conditions hold, then the player takes 
the bird. (A rule with no antecedents is like an else: it 
always fires. It is also OK to omit the —> entirely in this 
case.) In general, a rule list can have any number of 
rules. Their left-hand sides are examined starting from 
the top, and the first rule to match is activated. 

There are several different kinds of actions: you have 
already seen three. If a string occurs as an action, it is 
printed. If the first symbol in an action is the name of a 
built-in AAL procedure, such as take, then that proce- 
dure is executed (in the case of take, the procedure 
alters the database by asserting the statement (carrying 
player bird) and removing the statement that Says in 
which location the bird is). If an action begins with the 
word lisp, it is given to the LISP interpreter for evalu- 
ation; this is an easy action to implement because AAL 
is written in and runs on top of LISP. If the action can't 
be classified as one of the above, it is assumed to be a 
statement to be asserted, as in the case of (lit *x). 

AAL programs consist of descriptions of the locations, 





One, page 58, shows a short AAL program for a simple 
adventure with only two locations. 

The loc form is used to describe locations. The first 
symbol after the word loc is the AAL identifier for the 
location—every entity in an AAL program must have a 
unique identifier. The next item in the list is a string 
giving the long description of the location; the identifier, 
slightly modified, serves as the short description (the-first- 
room is modified to ‘The First Room”’). 

The remaining elements of the loc form are keyword 
lists—that is, lists beginning with special AAL keywords. 
A list beginning with the symbol contains specifies the 
items that the room contains at the start of the game. 
The exits list specifies the actions to take when the 
player attempts to leave the location. Each element of 
the exits list is itself a list, whose first element is the 
direction the player wants to go (for the first room, west 
and south are the only choices) and whose remaining 
elements provide the actions to take. 

If an action is a symbol, it is assumed to be the 
identifier of another location and the player is trans- 
ferred there without incident. If an action is a string, the 
string is displayed. So, if the player is in the first room 
and tries to go west, the list (w the-second-room) is 
examined and results in the player's being moved di- 
rectly to the second room. If the player goes south from 
the first room, a message is printed and the player is left 
where he was. As the north exit from the second room 
demonstrates, rule lists can be used to implement more 
complex actions. 

The third form in Listing One describes the blow 
command, which the player can enter to blow an object 
(such as the whistle—see later). The list (blow *obj) 
indicates the syntax of the command: the verb is fol- 
lowed by a single thing, the object of the blowing, which 
is bound to the global variable “obj. The requires list 
specifies what conditions must hold for the command 
to be carried out; this one says that the player must be 
carrying the object. If not, a message is printed that 
varies depending on what the object is. This is accom- 
plished using the syntax of Common LISP’s FORMAT 
function, a flexible output system similar to but more 
powerful than C’s printf function. Because AAL is imple- 
mented in and runs on top of LISP, it is very easy to 
adopt FORMAT directly into the language. The last line 
of the blow command description specifies the default 
action to take; in this case, it is to print a message. 

The next form describes the throw command. The 
synonyms hurl and chuck can be used by the player, but 
internally only throw is used. Throw’s syntax is a little 
more complicated than blow’s: you say throw <some 
object> at <something>. The variable *instr is set to the 
object thrown and the variable “obj to the thing at which 
it is thrown. To throw something, the player must be 
carrying that thing, and the target must be here (at the 
player's location). 

The fifth form in Listing One is an obj form describing 
an object—the game’s monster. Each item in an obj 
form is either a feature or a keyword list. In this example 
the monster has one feature, fixed, indicating that it is 


fixed in place and so can’t be taken b 
/ : tio y the player. Each 
objects, and commands in the adventure game. Listing | object in an AAL program may have several Sales | 
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Some of the world's biggest 
problems are being solved with 
a touch of Smalltalk. 


if hineign Affaos 6 Abroad and involved 

responsible is reeping in foreign affairs. 

track of every French citizen living abroad and every foreigner living in France. Each day, 
they process thousands of requests for documents or information, each one of which takes 
at least fifteen minutes. Arthur Andersen, the world’s largest accounting firm, has developed 
a natural language processing application with Smalltalk/V that enables clerks without 
computer training to extract the necessary data much faster. Thanks to Smalltalk and 
system developers Bart Schutte and Pascal Wattiaux, what once took fifteen minutes now 
takes 30 seconds. Vive la Smalltalk! 



















On the ground 
floor of high-tech 
environmental control. Climate, energy 


fire and security are all critical aspects of environmental 
control in large office buildings. The challenge for Johnson Controls, 
a leader in this industry, is to provide a control system that 1s both 
technologically advanced and simple to operate. Using Smalltalk/ y 
Research Scientists Gene Korienek and Tom Wrensch have created a work- 
space environment that allows rapid prototyping and modeling of future 
systems. At Johnson Controls this system 1s used to explore relationships between 
cognitive models of building operators and corresponding iconic representations 
of building components. Each system can then be tested by simply clicking 
a mouse and viewing the results in sophisticated color graphics on a rG. 


The world is made of objects. So 
naturally the world is turning to Object- 
Oriented Programming (OOPS). And 
the fastest, easiest OOPS language and 
environment is Smalltalk/V. 

With OOPS you program by defining 
objects, their inter- 






short amount of time. Perfect for pro- 
grammers who are looking for a fast, 
efficient prototyping environment. And 
anyone who wants to quickly and easily 
learn OOPS. 


Introducing Smallitalk/ V286. 


on the next generation OS/2 operating 
system as well as DOS. 


Get Smalltalk for a small price. 


Smalltalk/V sells for just $99.95. 
Smalltalk/V286 is $199.95. The follow- 
ing optional applications packs are 
available for $49.95 each: Communi- 
cations; EGA/VGA Color; Goodies 
#1, Goodies #2, Carleton ‘Tools and 
Goodies #3, Carleton Projects. 

And everything comes with a 60-day, 
money-back guarantee. 

So visit your nearest dealer. Or call 
toll-free, 800-922-8255 and order direct 
with MasterCard or Visa. Or write to 
Digitalk, Inc., 9841 Airport Blvd., Los 
Angeles, CA 90045. 

And let us help you put Smalltalk 
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to solve problems ‘ ith Smalltalk, even non-programmers can create 

big and Laci in- Teaching students to exciting applications. Economics Professor Arnold 
g ¢ ’ think economically Katz of the University of Pittsburgh developed 

cluding a com- _ " Economics PC Discovery World, an intelligent 

prehensive tutorial tutoring system for beginning microeconomics students. Using a mouse to access windows 

to get you started. and manipulate data, a student can call up a set of markets and commodities for an 

imaginary community. By changing the scenario, the student can not only study a variety 
Who needs of market behaviors, but also test the validity of his or her own reasoning. A process 
Smalitalk? that provides a lot of food for thought. 


Because Smalltalk models the way 
people really think, it is perfect for 
scientists, engineers and professionals 
who have to solve tough problems in a 
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which describe various aspects of the object. For in- 
stance, a bottle might have the container feature, which 
allows the player to put things inside it; or a door, grate, 
or chain might have the lockable feature, which Says 
that it can be locked and opened with a suitable 
instrument. 

Features also act as predicates; giving the monster the 
fixed feature will result in the fact (fixed monster) being 
asserted at the beginning of the game. In the monster 
description, there is also one keyword list that describes 
what to do when the monster is the object of a throw 
command: the monster destroys what is thrown, and a 
message is displayed. 

The next form defines a feature, treasure, which 
describes how to figure the score of an object (using the 
method of the original Adventure). Because many ob- 
jects can share the same feature, features provide for 
great economy of coding. Here you see also that features 
can take arguments, allowing them to be adapted to 
different situations. 

The next form describes the whistle, indicating that 
when it is blown, it emits a screech and kills the 
monster if it's present. 

As you can see from the definitions of the throw and 
blow commands, the monster, and the whistle, the 
actions to take on a command are distributed through- 
out the program. Here’s what happens when a com- 
mand is entered: first, it’s parsed according to the 
template supplied by the verb, and up to three variables 
are assigned: *command to the command verb, *obj to 
the object, and *instr to the instrument. The last two are 
assigned as specified in the syntax template of the 
command. 

Processing the command then begins, in two stages. 
First, the requirements are checked. The requirements 
specified with the command itself are checked first, then 
those on the object, and finally those on the instrument. 
In my example only the commands themselves have 
requirements, but it is common for special objects or 
instruments to place their own constraints on com- 
mands. 

If all the requirements are satisfied, the command is 
executed. First, the object is checked to see if it has any 
actions; if so, they are carried out and processing stops. 
If the object has none, the instrument is tried, and if it 
has none, the actions on the command are done. In this 
way, objects implement their own actions for the most 
part, and actions specified with commands are the 
defaults. 

This overview of AAL has hit the major features of the 
language, but unfortunately I have had to omit some 
features and many details. You will meet a few other 
aspects of AAL in the rest of the article. 


AAL’s Programming Styles 

Having seen what AAL looks like, let's examine its roots. 
As I said, AAL combines aspects of three programming 
styles: logic programming, object-oriented programming, 
and LISP. Let’s start with logic programming. 


22 










Logic Programming 

In the late 1960s, it was noticed that mechanical theo- 
rem provers could be harnessed to answer questions 
about a database of information.’ Further refinements 
led to several powerful AI programming languages, in- 
cluding PLANNER,” Conniver,? and AMORD.4 PROLOG is 
a cleaned-up (but watered-down) successor of these 
languages. The basic idea behind deductive retrieval is 
simple: a query—typically a pattern containing vari- 
ables—is compared against a database of facts, and 
those facts that match the query are returned. 

You can add rules to the picture to make things more 
interesting (and complicated). There are two kinds of 
rules: backward rules, which are activated by queries, 
and forward rules, which are activated when new facts 
are added to the database. AAL has both these kinds of 
rules, though the earlier description didn’t mention 
them. 

Backward rules have a single consequent and one or 
more antecedents and are written in AAL with the 
consequent on the left, like so: 


((in2 *x *y) <— (in *x *z) (in *z *y)) 


This rule says that something *x is in2 something else *y 
if *x is in some third thing *z and *z is in “y. Backward 
rules are the rules of PROLOG; you could write the 
preceding rule in standard PROLOG syntax as: 


in2(X, Y) — in(X, Z), in(Z, Y). 


Backward rules are stored in the database along with 
facts. When a query comes along that matches the 
consequent of a backward rule, processing continues 
with the rule’s antecedents treated as subqueries. So, if 
your database consists of the facts: 


(in water bottle) 
(in bottle house) 
(in food bag) 

(in bag house) 


and the preceding rule, then the query (in2 water house) 
would match the consequent of the rule, binding *x to 
water and *y to house; then the query (in water *z) is 
processed and matched against (in water bottle) with *z 
bound to bottle; and finally, the second antecedent of 
the rule, which is (in bottle house) given the current 
variable bindings, is processed and matched against the 
identical fact in the database. 

Note that the last two facts in the database provide a 
second answer to the query; if desired, this answer can 
be found via backtracking. Note also that with rules 
present, you have to extend the simple pattern-match- 
ing algorithm to deal with the case of matching two 
unbound variables against each other. In this case you 
simply bind the variables to each other: when either one 
becomes bound, the other is automatically bound to the 
same value. This generalized matching process is called 
unification. 

So far, everything I have said is exactly as in PROLOG. 
Forward rules, however, do not exist in PROLOG ( though 
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p> We're revolutionizing the economics of Al. 


With Allegro Common LISP, you can develop your applications in a first- 
class environment and deliver them on the lowest-priced platform ever! — For 
only $600, Allegro CL brings the complete Common Lisp standard and the 
best features of high-end LISP environments to the entire Apple Macintosh 
family of personal computers. 


p You Get a Full Common Lisp 


Unlike other implementations of “Common LISP” for the Macintosh and 
IBM PC, Allegro CL is truly complete. No features have been left out. Allegro 
CL delivers lexical closures, complex numbers, adjustable arrays, and all 
other features of Common Lisp as specified in Common LISP: the Language 
by Guy Steele Jr. 


p With the Best Environment. 


The Allegro CL programming environment is completely integrated with the 
Macintosh user interface to give you tools and features previously found only 
on high-end LISP machines. A programmable EMACS-style editor and other 
tools—such as a stepper, debugger, and a window based inspector—help you 
get your programs up and running quickly and easily. 

Ask any of our customers, many of them major corporations and leading- 
edge companies in Al research. They'll tell you that Allegro CL for the 
Macintosh is the best programming environment this side of $60,000. 


p Allegro CL is Fast, Compact 


Until now, the smallest Common LISP for a microcomputer was 3 mega- 
bytes of code. On workstations, Common LISPs routinely occupy between 
5 and 8 megabytes. Allegro CL changes all that: it fits on a single 800K floppy 
and runs on Macintoshes with just 1 megabyte of RAM! 

Our tightly written code coupled with our incremental compiler make 
Allegro blaze. Many developers report compile times on a Mac II that 
bettered LISP machines and left other micros far behind. 
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p And Features Advance Interface Tools. 


Within a matter of days, you can have a full working model of your program's 
user interface. Allegro CL provides a complete set of Macintosh interface 
components as pre-defined, self-managing objects. You also get full low- 
level access to the Macintosh Toolbox. Easier implementation means you 
can spend more time on design and refinement. Your product—and your 
customers—benefit. 


p You Also Get Our Commitment to Continued Development. 
At Franz Inc., we’re in the business of bringing you leading edge technologies 
on accessible hardware. To that end, our first additions to Allegro CL are 
already available. 
The Allegro Flavors module gives you compatibility with Flavors release 
61 code libraries. The Allegro Foreign Function Interface lets you call routines 
written in C, Pascal, or Assembly language. 


p> It’s Yours For Next to Nothing. 


We are proud to offer Allegro Common LISP at an exceptional price. Call 
us today. Tomorrow, you could be testing the full capabilities of our revolu- 
tionary Common LISP environment. 


For more information on how you can get started in Artificial 
Intelligence on the hottest micro in the market, contact us at: 
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they did in PLANNER and related languages). In AAL, a 
forward rule looks like this: 


(when-asserted (in *x *y) 
—> (contains *y *x)) 


This rule says that if something *x is in something else 
‘y, then *y contains *x. More precisely, whenever a fact 
of the form (in *x *y) is added to the database, this rule 
is activated and the actions on its right-hand side are 
taken. In this case, the only action is to assert another 
fact into the database. Backtracking never occurs with 
forward rules. Forward rules are similar to the produc- 
tion rules of languages such as OPS5. 

Note that the rules in Listing One are strictly speaking 
neither forward nor backward because they are acti- 
vated by commands, not queries or assertions. But 
because they behave more like forward rules, they have 
a similar syntax. 


Object-Oriented Programming 

Object-oriented programming, typified by languages such 
as Smalltalk and C+ +, consists of two major ideas: a 
program consists of a network of objects that communi- 
cate by message passing, and these objects obtain many 
of their attributes by inheritance. 

The second of these ideas is an outgrowth of AI 
research into frame representation languages,°® and it is 
the one AAL employs. Objects can have more than one 
feature, and features may themselves have features, 
allowing an interconnecting web of inheritance. As in 
standard object-oriented programming languages, in- 
heritance facilitates the abstraction of common behav- 
iors and properties. 


LISP 

LISP’s enormous power derives from several sources. 
One source is LISP’s ability to model a wide variety of 
abstractions using higher-order procedures, a feature 
best exemplified in the Scheme dialect’ but also avail- 
able to a large extent in Common LISP. I use this ability 
to implement streams, a data type crucial to AAL’s 
implementation. 

Other sources of power are LISP’s great syntactic 
flexibility and list-processing power. Using these, it is 
possible to implement languages on top of LISP very 
easily, without the need for bulky and complex lexical 
analyzers and parsers. Instead, you let LISP’s macros 
and READ function take care of that tedium and work at 
the much more convenient level of lists. And because 
LISP's interpreter is always present, even when AAL 
programs are running, you can easily allow AAL pro- 


grams to escape into LISP, thereby in effect making AAL 
a superset of LISP. 


Implementing AAL 

There are numerous interesting aspects of AAL's im- 
plementation, but here | only have space to discuss a 
few of them. The most difficult and interesting part is 
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the deductive retriever, or deducer as it’s called in AAL, 
so I'll consider that first. 3 

Listing Two, page 58, shows the entire code for the 
deducer. The interface to the rest of AAL consists of the 
four functions assert, retract, deduce, and deduce- 
pattern. Assert is responsible for adding a fact or rule to 
the database. It only adds something if it is not already 
present. If it does add a fact, assert checks the left-hand 
sides of the forward rules to see if any apply and 
executes the actions of all those that do apply. 

Retract removes a fact or rule from the database if it is 
there. AAL also allows rules to trigger when facts are 
retracted, and retract handles this. 

Deduce and deduce-pattern are far more complicated, 
so I'll look at them in great detail. Deduce takes two 
arguments—a list of patterns that make up the query 
and a list of variable bindings. Deduce augments the list 
of bindings it is given initially with bindings for variables 
in the pattern list and returns a stream of augmented 
variable bindings. (I will explain streams later; for now 
you can think of them as lists.) From these augmented 
bindings, the caller of deduce can obtain values for the 
variables in the query. The pattern list is taken as a 
conjunction, so if called with the list ((in *x *y) (in *y *z)), 
deduce will return a stream of all bindings for *x, *y, and 
*z that satisfy both patterns. 

Deduce begins by checking to see if the list of patterns 
is empty; if so, the query is trivially true and deduce 
returns a single-element stream consisting of the cur- 
rent bindings. Again, you can think of stream operations 
such as stream-cons as their list equivalents, and you 
can treat “empty-stream* as nil. 

If the list of patterns is not empty, deduce first obtains 
a stream of bindings statisifying the first pattern, using 
the deduce-pattern function. Then it calls itself recur- 
sively on the remaining patterns for each binding in that 
stream, appending all the resulting binding streams into 
one large stream (that is the function of stream-mapcan). 

Deduce-pattern simply calls deduce-pat with the pat- 
tern, bindings, and a list of facts and rules from the 
database that might possibly unify with the pattern. In 
its simplest form, find-possible-unifiers could just return 
the entire database all the time; I will make use of a 
slightly more sophisticated indexing scheme that can 
cut down significantly on the number of facts and rules 
returned. 

Deduce-pat takes a pattern, a list of bindings, and a list 
of possible unifiers and returns a stream of augmented 
binding lists. It first checks to see if there are any more 
possibilities. If not, it returns the empty stream, indicat- 
ing failure. Otherwise, it takes the first possibility and 
tries to unify it with the pattern, renaming its variables 
first if necessary. 

If the unification fails, deduce-pat calls itself recur- 
sively on the remaining possibilities. If the unification 
succeeds, deduce-pat calls deduce on the antecedents 
of the rule (which will be null if the rule is actually a fact) 
and the bindings produced by the unification. It ap- 


pends the resulting stream to the stream obtained from 


calling itself recursively on the remaining possibilities 
and returns the result 


- This call to stream-a 
, -append, like 
the earlier call to stream-mapcan, is necessary to ensure 
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that every possible binding of the query variables is 
found. 

Several internal functions of the deducer deserve 
mention. The unify function takes two patterns and a set 
of bindings and tries to unify the patterns. It returns the 
bindings augmented with new ones if it can unify and 
the symbol fail if it can’t. It proceeds by recursively 
cdring down the patterns, trying to match each element. 
Variables are handled by unify-var: unbound variables 
are bound and the match succeeds; bound variables are 
treated like their values, by calling unify-const. Unify- 
const just compares the two elements for equality, 
returning the existing bindings if they are equal and fail 
if not. This unifier does not handle patterns containing 
nested structures as does PROLOG's, but it could easily 
be modified to do so. 

Variable bindings are implemented as LISP association 
lists (alists). The add-binding function just conses a new 
pair onto the binding list, and the var-value function 
uses LISP’s built-in assoc function repeatedly to find the 
value at the end of the chain of bound variables. 

The functions add-to-database, remove-from-database, 
and find-possible-unifiers implement the database index- 
ing scheme. This scheme is quite simple: facts are stored 
by their first element, on the element's property list. For 
instance, all the facts beginning with in are stored 
together. Backward rules (the only kind of rule stored in 
the database) are stored by the first element of their 
consequent, unless that element is a variable, in which 
case the rule is stored under the * symbol. The possible 
unifiers for a pattern whose first symbol is a constant 
include those on the property list of the constant and 
the rules stored under *. If the first element of a pattern 
is a variable, you are forced to search the whole data- 
base. 

This indexing scheme has the advantage of generality. 
Further improvements could be obtained, still preserv- 
ing generality, by indexing off more than the first ele- 
ment; see note 8, Chapter 14, for one such technique. 
Because many relations, such as in, will be ubiquitous 
in adventure games, they can be treated specially to 
improve efficiency even more. For instance, if the pro- 
gram maintains, with each object, a list of things that 
that object contains, then finding the values for *x in the 
pattern (in *x object) is just a matter of fetching that list. 
Many such optimizations are possible, but keep in mind 
that they are efficiency hacks, to be hidden in the 
database indexing mechanism and not made a feature 
of the language. The view of the adventure world as a 
single database of facts is a great strength of AAL. 


Streams 


If streams are just lists, then deduce will find every 
possible binding of the variables and return a list of all 
of them. This could be a big waste of time if you want 
only the first binding. And if (as is possible) there are an 
infinite number of answers, then deduce will never 
return. It would be nice if deduce worked more like 
PROLOG, returning the first answer as soon as it is 
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found but remembering where it was so that subse- 
quent answers could be requested. In fact, this is just 
how deduce works because streams are not lists but. 
special data structures with a rather interesting prop- 
erty. | 

Streams behave much like lists—they have a car, 
which is a value, and a cdr, which is another stream 
(possibly the empty stream). They are constructed using 
an operation such as cons. The crucial difference is that 
a stream's elements are not all evaluated; only the first 
is. The evaluation of the remaining elements is delayed 
until they are actually requested. 

Compare the two expressions: 


(cons 1 (cons 2 nil)) 
and: 
(stream-cons 1 (stream-cons 2 *empty-stream”*)) 


In the first of these, the inner call to cons is evaluated, 
then the outer one, resulting in the list (1 2). But in the 
second expression, the inner call to stream-cons is not 
evaluated immediately. Its evaluation is delayed, and the 
resulting object looks something like: 


(1 [delayed computation of (stream-cons 2 *empty- 
stream’*)]) 

(This notation is merely for explanation; you'll see the 
actual implementation in a moment.) When stream-car 
is called on this object, 1 is returned immediately. But 
calling stream-cdr forces the evaluation of the delayed 
computation. This results in a new stream, which you 
can write as: 


(2 [delayed computation of *empty-stream*]}) 


Another call to stream-car will produce 2, as it should, 
and calling stream-cdr again will result in the empty 
stream. So, using stream-car and stream-cdr on a stream 
is just like using car and cdr on a list, except for when 
the work is done. 

The implementation of streams is remarkably simple, 
provided you have a lexically scoped LISP such as 
Scheme or Common LISP (see Listing Three, page 62). 


You can implement them in terms of two primitives—delay 
and force. Delay takes a LISP expression and turns it into 
a delayed computation; force takes a delayed com- 
putation and evaluates it. 

To delay a computation, all you have to do is enclose 
it in a function of no arguments, so an expression such 
as (+ 2 3) becomes #’(lambda () (+ 2 3)) (in Scheme, the 
# and ’ characters aren’t necessary). You can write delay 
as a Simple macro: 


(defmacro delay (thing) 
‘# (lambda () ,thing)) 


To force a delayed computation, you need only fun- 
call it, so you can write force like so: 
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(defun force (thing) 
(funcall thing)) 


You can implement a stream as a LISP dotted pair 
(cons cell) whose car contains the car of the stream and 
whose cdr contains the delayed computation. Con- 
structing a stream from a value v and a computation c 
can be done by writing (cons v (delay c)), which is just 
what stream-cons does: 


(defmacro stream-cons (thing comp) 
(cons ,thing (delay ,;comp))) 


Note that stream-cons must be a macro so that the 
second argument is not evaluated. 

The other stream functions are simple. Stream-car is 
identical to car, whereas stream-cdr has to force the cdr 
of the stream object. You can represent the empty 
stream with nil, making the stream-empty? predicate 
equivalent to null. With these functions in place, you 
can write more complex ones such as stream-mapcan 
and stream-append just as you'd write their equivalent 
list-manipulating versions. The remaining trick is to 
delay the second argument of stream-append so that 
only the first argument is evaluated. 

What is the effect of using streams in deduce? Instead 
of computing all the answers before returning any, 
deduce will take the first answer it finds and return a 
stream whose car is that answer and whose car repre- 
sents the rest of deduce’s work. If only the first answer 
is desired, the rest of the stream can be thrown away 
and no more work will be done. If another answer is 
wanted, calling stream-cdr on the stream will generate 
it. In this way, only as many answers as required are 
actually computed. 

Streams have many useful applications besides this 
one. For an excellent description of streams and their 
uses, including a PROLOG-like interpreter similar to the 
one I've presented here, see note 7. 


Applications of the Deducer 
Let's consider three uses of the deducer in the im- 
plementation of AAL: rules, the every action, and require- 
ments checking. 

Much of the work in a typical AAL program is done by 
rules. A typical rule might say: 


((at lamp *x) (on lamp) —> (lit *x)) 


To evaluate the rule, you first see if the antecedents (the 
patterns to the left of the -> symbol) can be satisfied, 
and if so you execute the actions on the right of the —> 
with the bindings for the variables on the left. Only the 
first set of bindings that matches the antecedents is 
used, so you really do not need the full power of streams 
here. The implementation is simple: 


(let ((bindings-stream (deduce (rule-antecedents rule) 
bindings))) 


(if (stream-empty? bindings-stream) 
:-did-not-fire 
(do-rule-actions (rule-consequents rule) 
(stream-car bindings-stream)))) 


Here, bindings are whatever bindings are in force at the 
time. If the rule occurs at top level, these will be the 
bindings of the AAL global variables. But rules may also 
occur as actions in other rules, so the bindings may 
contain variables accumulated from those rules. 

As another application of the deducer, consider a 
kind of AAL action I haven't yet mentioned—the every 
action. It allows an action to be taken for every possible 
binding of a variable. For instance, to ‘take inventory’— 
that is, display the items that the player is carrying—you 
could write: 


(every *x (carrying player *x) —> (lisp (print *x))) 


Implementing the every action is trickier than it might 
seem. The basic idea is to obtain the stream of bindings 
from using deduce on the antecedents, then execute the 
consequents for each binding. The problem with this 
approach is that a binding may be repeated if the 
deducer can derive it via different routes. The solution 
is to turn the stream of bindings into a list, then remove 
the duplicates. The implementation is shown in Listing 
Four, page 62. 

As my final and most complex example, consider how 
the requirements for an action are checked. The com- 
piler parses each requires specification into a list of 
requirement structures, each of which has three fields: 
a pattern to be checked against the database; a string to 
output if the pattern fails; and a Boolean variable called 
succeeded?, whose use I'll describe later. These struc- 
tures (along with everything else mentioned when an 
AAL entity is defined) are stored on the property list of 
the entity's identifier. 

Requirement checking is done by the satisfies-require- 
ments function, which is called with the command, 
object, and instrument of the user’s command and calls 
check-requirements for each of the three. Check-require- 
ments gets the list of requirements for the command 
from the given entity, sets their succeeded? fields to nil, 
then calls check-reqgs with the requirements list and the 
list of bindings of AAL’s global variables. If check-reqs 
returns t, so does check-requirements; otherwise, check- 
requirements displays the string returned by check-reqs 
and returns nil. 

Check-reqs’ job is to return t if all the requirements 
can be satisfied or the string that should be printed if 
they can’t all be satisfied. If AAL didn’t allow different 
strings to be associated with each pattern, then you 
could represent the requirements as a list of patterns 
and implement check-regs very easily using deduce: 


(defun check-regqs (reqs bindings) 
(if (stream-empty? (deduce reqs bindings)) 


“The requirements could not be satisfied” 
t)) 


But the presence of strings for each pattern doesn’t 
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permit this approach because, when deduce returns an 
empty stream, you don't know which pattern was re- 
sponsible for the failure. You need to use deduce-pattern 
on each pattern individually. One plausible first attempt 
might look like Example 1, below. Unfortunately, this 
isn't correct. Because of backtracking, it is a little tricky 
to pin down just which requirement is to blame when 
failure occurs. 

Consider the requirements of lighting a lamp, which 
stipulate that the lamp contain batteries that aren't 


(defun check-regs (regs bindings) 
(if (null reqs) ;: all requirements passed--success 
T 
;; else, check the first 
{(let* ((req (car reqs)) 
(binding-stream (deduce-pattern (requirement-pattern req) 
bindings) ) 
(result) ) 
:; if it failed, return its failure string 
(cond 
((empty-stream? binding-stream) 
(requirement-failure-string req) ) 
7; @lse, try all the bindings on the other reqs until 
success. 
;: dostream just iterates over the elements of the stream. 
(t 
(dostream (binds binding-stream) 
(setq result (check-regs (cdr reqs) binds) ) 
(if (eq result t) 
;; the remaining requirements passed--success 
(return-from check-reqs t))) 


7? No other bindings worked: return the last failure string 
result) })})) 


Example 1: An incorrect attempt to use deduce-pattern 
on each pattern individually 
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dead: 


(requires ((in *x lamp) “Nothing is in the lamp”) 
((battery *x) “There are no batteries in the 
lamp”) 
((not (dead *x)) “The batteries are dead”’)) 
You would like a message to print out only when the 
corresponding pattern is the one responsible for failure. 
But the guilty pattern is not always the last pattern that 
fails. 

Consider a situation in which there are two things in 
the lamp, only one of which is a battery, and the battery 
is dead. Say that when deduce-pattern is called with the 
first pattern (in *x lamp), it returns a stream whose first 
element is a binding list with *x bound to the battery. 
Then the second pattern (battery *x) succeeds, but the 
third one fails because the battery is dead. A message 
should not be printed out yet because there might be 
other, nondead batteries in the lamp. So you eventually 
backtrack to the first pattern and get the second binding 
for *x, which is the other object in the lamp. Now the 
second pattern fails right away because the second 
object is not a battery. Clearly, you would like to say that 
the reason why the lamp could not be lit was that the 
batteries in it were dead; the fault is with the third 
pattern, not the second. But the version of check-regs in 
Example 1 will return “There are no batteries in the 
lamp.” 

The key to the right solution is to notice that once a 
pattern has succeeded once, it cannot be the cause for 
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ultimate failure, even if it later fails. Only a pattern that 
never succeeds can be guilty. The correct version of 
check-reqs uses the succeeded? field of the requirement 
structure to record this fact; it is given in Listing Five, 
page 63. 


Review 

You've seen how AAL combines three programming 
styles into a powerful language. At AAL’s heart is the 
deductive-retrieval or logic-programming style of 
PROLOG; AAL represents the state of an adventure game 
as a database of facts, and AAL programs work by 
examining and manipulating this database. The pattern- 
matching, rule-following, and backtracking abilities of 
the deducer make it easy to write powerful rules and 
conditions simply. 

AAL uses the idea of inheritance from object-oriented 
languages to ease the definition of game objects, loca- 
tions, and commands. Each of these entities can possess 
one or many features, which not only act as abbrevia- 
tions for properties but also serve as predicates in the 
database. Features can take arguments and may them- 
selves have features, allowing complex networks to be 
constructed. Using features to group commands, loca- 
tions, and objects can also result in considerable econ- 
omy in rule writing because a whole group of entities 
(for example, commands that move the player) can be 
described with a single pattern. 


Finally, AAL would have been an order of magnitude 
more difficult to implement were it not written in and 
on top of LISP. LISP’s reader and macro facility trivial- 
ized the parser and compiler for AAL. LISP’s property 
lists, built-in symbol table, and support for association 
lists simplified many aspects of the implementation. Its 
ability to construct and call functions on the fly made 
possible the implementation of the vital stream data 
type. And by allowing AAL programs to escape to the 
underlying LISP system, I obtained hundreds of useful 
functions for free. 


What Next? 

Here I have offered only a sketch of AAL, which is itself 
only a small part of what could be done in this direction. 
Many of the fine points of AAL and its implementation 
can be gleaned from reading the source code. But the 
deducer stands on its own as a useful program, or it can 
serve as the beginning of a PROLOG implementation. I 
have taken care to have all the essential code for the 
deducer published with this article, so you can begin 
without delay. 

I realize that Common LISP is, despite its name, not 
terribly common compared to languages such as C and 
Pascal. But other LISPs, such as XLISP and Scheme, are 
available and will do just as well. And it is certainly 
possible to translate AAL into a language such as C, 
though I would guess the code size would more than 
double. The major difficulty concerns streams, which 
cannot be implemented in their full generality in a 
language that does not allow run-time creation of func- 
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Objective-C® language and are designed for 
programmers who want the benefits of this new 
technology without giving up the advantages of C. 

We even offer more than just a develooment 
environment. 

We sell libraries of powerful, robust classes 
you can use directly in your applications. Like 
ICpak™ 201, a set of pretested Software-IC’S for 
building custom graphical user interfaces. 

Our products operate in a wide variety of work- 
station environments. As well as on the PC-AT™ 
and compatibles. 

In addition, our Support is second to none. 
We design, build, market and service our own 
products. Hence, we will do all thats necessary 
to keep you completely satisfied. 

So before you jump into object-oriented eng! 
neering, talk to the company that's got the fullest 
range of products. Stepstone. 

We wont let you down. 








T™T™ 
Zz Stepstone 
Fm The Leader inf Object-Oriented Technology 


TheStepstoneCorporation  75GlenRoad © SandyHook,CT06482 2034261875 _Ielex 506127 ~—- FAX 203 270 0106 


PC-AT isa trademark of International Business Machines Corporation. Objective-C and Software-IC are registered trademarks of The Stepstone Corporation. Stepstone and ICpak are trademarks of The Stepstone Corporation. 
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Our front end helps protect 


‘Today’s users require sophisticated 
interfaces for their applications. 
Yet complex front ends are a real pain 
to create, especially when the specs 
change and your deadlines don’t. 

But now J YACC introduces JAM™ 
a powerful 
user inter- 


ment tool 
that makes 
it easier 
than ever 
Use windows and colors to design 
freely with JAM. and revise 
your complex applications. 

JAM is the first tool that does it all, 
from prototyping to implementation. 
With JAM, you start by creating 
screens and linking them together to 
develop an application shell. You can 
experiment with the look of the inter- 
face, and even explore “what if” 
scenarios on the application flow. 
Then you attach processing routines, 
and your application is complete. 





face develop- 


JAM works under the following operating systems: 


° UNIX® e XENIX® 
¢ MS-DOS® 
e VMS® 


¢ RMX™ 
e VOS™ 


You'll be amazed at how quickly 
your applications spring to life with 
JAM’s interactive screen management 
utility. You can use features like con- 
text-sensitive help, shifting and scroll- 
ing fields, a variety of visual attributes 
and extensive data validations to 
create exciting screens, windows and 
menus—all without writing a single 
line of code. JAM also lets you test 
your prototypes at any time. 

JAM lets you draw from its extensive 
subroutine library to help you write 
processing routines faster. And revi- 
sions to your applications are easier, 


Introducing 


JAM 





your back end. 


because your subroutines are insulated 
from the data entry and presentation 
details of the interface. 

JAM is extremely portable. It runs 
on almost every computer, from PCs to 
superminis, and works under 6 operat- 
ing systems. This allows you to develop 
consistent interfaces throughout your 
company— 
a significant 
asset to the 
Fortune 500 
companies 
that have 
been using 
JAM for more Enhance applications with 
than a year. context-sensitive help. 

JAM from JYACC. It gets your 
front ends—and back ends—in great 
shape. Call for more information about 

AM and our 
Ee diskette. 800-458-3313 
JYACC FORMAKER™ JAM’s screen 
manager, is also available separately. 
JYACC, Inc., 116 John Street 
New York, NY 10038 212-267-7722 





JYACC Application Manager. The Composer for Sophisticated Applications. 


MS-DOS, XENIX: Microsoft Corp.; UNIX: AT&T Bell Labs; 





Excellence in Systems & Application Design 
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RMX: Intel Corp.; VMS: Digital Equipment Corp.; VOS: Stratus Corp. 
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| 
386 MOTHERBOARDS FOR 386 SPEED 


Don't let your PC give up the ghost — Hauppauge has just 
arrived with a new spark of life: the 386 MotherBoard.™ 

Far more advanced than an accelerator card, our line of 
MotherBoards grace your PC, PC/XT, PC/AT or compatible 
with speeds equal to the IBM PS2 Model 80. And faster. 
Because we've built in 1 Megabyte of high speed RAM and 
a 387 math coprocessor socket for speeds that make 
users humble with awe. 

OS/2 Compatible. To ensure a long, fruitful life, our 
386 MotherBoard is compatible with the PC/AT (BIOS and 
I/O) —so you can run the new generation of DOS, OS/2. Our 
Board also runs Windows/386, UNIX V and PC-MOS/386. 
For more power, you'll find 16-bit expansion slots that 
accommodate the latst I/O expansion cards. No 386 
accelerator card gives you so much versatility. Only our 
386 MotherBoard gives your PC a future with un- 
limited possibilities! 

The Critics Applaude! PC Magazine awarded our 
Board “The Editor’s Choice” for 386 Replacement Boards. 
PC World called it “the Upgrade Product of the Year.” 


CONVERT YOUR PC, XT OR AT 
INTO A HIGHER FORM OF LIFE! 





Technical Features = 16 MHZ 80386 = 1 Megabyte of 
100 nsec 4-way interleaved RAM * PC/AT compatible I/O and 
BIOS for support of OS/2 = Six 8-bit expansion slots = two 
16-bit expansion slots (four on 386 MotherBoard/AT) = One 
32-bit expansion slot for up to 12 Megabytes of high speed 
memory ® Battery-powered clock calendar 


386 MotherBoard/PC or MotherBoard/XT .......... 
386 MotherBeand/ AD. iiss iseccccssesotateaciessccse 
32-bit RAM Board 

(2 Mbytes installed; up to 4 Mbytes) ..........c.000 
16 MHz 80387 math COprocessoOr .........ceseessessees 
16-bit combination hard disk/ 

floppy disk CONPTOMER «.: ..:..0.4.c.cscsseseccecucegimes tens 


For more information on our easy-to-install MotherBoard, call: 
1 (800) 443-6284. In New York, call (516) 434-1600. 


Hauppauge Computer Works, Inc. Hau J 
175 Commerce Drive, hoe 
Hauppauge, New York 11788 
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Enter customer information? 


IG you program in C, take a few 
moments to learn how Windows for 
Data can help you build a state-of-the- 
art user interface. 


W Create and manage menus, data-entry forms, context- 
sensitive help, and text displays — all within windows. 

W Develop window-based OS/2 programs right now, 
without the headaches of learning OS/2 screen manage- 
ment. Run the same source code in PCDOS and OS/2 
protected mode. 

M Build a better front end for any DBMS that has a C- 
language interface (most popular ones do). 


warren SEMEN GN ne eee aE EEE cate ae eter ater 


FROM END TO BEGINNING 


Windows for Data begins 
where other screen packages end, 
with special features like nested 
pop-up forms and menus, field en- 
try from lists of choices, scrollable 
regions for the entry of variable 
numbers of line items, and an ex- 
clusive built-in debugging system. 





NO WALLS 

If you've been frustrated by the limitations of other 
screen utilities, don’t be discouraged. You won’t run into 
walls with Windows for Data. Our customers repeated- 
ly tell us how they’ve used our system in ways we never 
imagined — but which we anticipated by designing Win- 
dows for Data for unprecedented adapatability. You will 
be amazed at what you can do with Windows for Data. 


ere ae 


LEvE Invoice No.: TEM toa 
YLT [- | 
NA Ss Search for customer record? (Y/N): 
M UV (Y/N): 


Enter billing address? (Y/N): 
rEnter marketing information? (Y/N): 


yest mem? No. PRODUCT DESCRIPTION ira 1 : ae errie 2 WW / N po Ww 


Bet erlecte ent Et ere chaos ton winP? 








ATA® 


beta 


Se ca: SRE 
William Jones 
Innovative Software 


351 Bulletin Avenue 
Needham, MA 82194 U ? 
(617) 394-5512 P- 


Subtotal: 10Ot 
TPS a eal ee 

TOTAL; E> 
Payment : M 


YOU ARE ALWAYS IN CHARGE 

Control functions that you write and attach to fields 
and/or keys can read, compare, validate, and change the 
data values in all fields of the form. Upon entry or exit 
from any field, control functions can call up subsidiary 
forms and menus, change the active field, exit or abort 
the form, perform almost any task you can imagine. 


OUR WINDOWS 
WILL OPEN DOORS 

Our windows will open doors to 
new markets for your software. 
High-performance, source-code- 
compatible versions of Windows 
for Data are now available for 
PCDOS, OS/2, XENIX, 
_ & UNIX, and VMS. PCDOS 
versions are fully compatible with Microsoft Windows. 
No royalties. 


MONEY BACK GUARANTEE 

You owe it to yourself and your programs to try 
Windows for Data. If not satisfied, you can return it for 
a full refund. 

Prices: PCDOS $295, Source $295. OS/2 $495. 
XENIX $795. UNIX, VMS, please call. 


Call: (802) 848-7731 ext. 31 
Telex: 510-601-4160 VCSOFT FAX 802-848-3502 


21 Elm Ave. 
Richford, 
VT 05476 
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CREATING AAL 
(continued from page 34) 


tions. Ersatz streams designed expressly for their role in 
the deducer can be implemented, however, by allocating 
a structure (or record) and storing the relevant local 
variables in it directly. 

I have hardly mentioned the natural-language aspects 
of AAL because they are secondary to the concerns of 
the article and are not well developed in any case. Much 
could be done with existing natural-language technol- 
ogy to improve the parser and the treatment of com- 
mand execution. I would guess that the conceptual- 
dependency representation of Roger Schank and his 
students might prove useful in this domain (see, for 
example, note 9). 

Let me close with a specific, rather ambitious sugges- 
tion for improving the natural-language part of AAL. One 
weakness of the language is that it forces commands to 
be specified fully: you must say “throw axe at dwarf’ 
instead of just “throw axe,’ as the original Adventure 
would let you do, or “blow whistle” instead of just 
“blow” when the whistle is the only blowable thing 
youre carrying. Adventure’s resolution of the ambiguity 
was extremely ad hoc. 

One reasonable solution when something is omitted 
from a command would be to look around for a thing 
that satisfied the requirements of the command and, if 
there was only one such thing, to use it. That would take 
care of blowing the whistle, but not killing the dwarf, 
and not a case in which the player said “drink” and was 
carrying a bottle of water, but the cap was on the bottle 
and the bottle was in a locked chest. 

A more general mechanism would determine the 
player's desired action (drink the water in the bottle), 
construct a plan to achieve it (open the bottle, open the 
chest—do I have the key?), and execute the plan. It 
would be a very ambitious programmer indeed who 
tried to implement this idea; a good solution would 
probably be worth a Ph.D. thesis. In fact, see Allen’s!° for 
a Start. 


Availability 

All the source code for articles in this issue is available 
on a single disk. To order, send $14.95 to Dr. Dobb's 
Journal, 501 Galveston Dr., Redwood City, CA 94063, or 
call (415) 366-3600, ext. 221. Please specify the issue 
number and format (MS-DOS, Macintosh, Kaypro). 
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Circle Reader Service No. 1. 


C programmers are talking about C_talk™ 
The easy way to add the POWER of 
OBJECT-ORIENTED Programming to C 


C_talk extends your C compiler to a real Object-Oriented Language (OOL). 
It is not a new language; it simply adds Smalltalk-like features to C: 

Q Encapsulation 

Q Messaging (Dynamic Binding) 

Q) Inheritance 


C_talk offers all of the advantages of OOLs: 
Q A highly modular software design methodology 
Q) Reusable software components 
Q Extendable software components 


Plus the advantages of C: 
Q Speed, size, flexibility 
Q Ease of application delivery 
Q Access to C libraries and C tool sets 





C_talk consists of an application development environment with: 
Q A powerful Smalltalk-like Browser for browsing, defining and editing an 
application's object class hierarchy 


Q A Preprocessor for converting object class descriptions into standard C 
programs that are compatable with popular C compilers 


Q An integrated, semiautomatic Make utility for controlling the preprocessing, 
compiling and linking of an application, object classes, C files or libraries 


C_talk is designed to run on an IBM® PC (or compatable) with one of the following C 
compilers: Microsoft® C, Lattice C, Turbo C, or C86. A system configured with a hard 
drive and mouse is highly recommended. 


To order: 

CNS, Inc. 

Software Products Dept. 
7090 Shady Oak Road 
Eden Prairie, MN 55344 
(612) 944-0170 

Credit Cards: Master Card, Visa ie 4 bool 


Shipping: $5 - US id *p, “empty; 
$25 - Intemational 


add_ newObject 
/* Add anObject to the receiver set. If the object is alreadyinthe set */ 
/* then do nothing. =f 


id newObject; /* The id of the object toinsertintotheset. */ 


ores it == self-> ~~ 
nd@; 


and if full * 
IBM trademark of IBM ears ee hasten Pdool® Mien er ee receiver 
orr es sesh a if (bool == 0) /* no-then fi ind firste empty slot * 
°. 
C_talk is a trademark of CNS, Inc. es = (id *)self- 
for (i=0; i< athe el be +) 
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ARTICLES 


Topics in 
Knowledge-Based 


Languages 





Presenting a workable compromise between the 
rigid structures of Prolog, and the chaos of 


proceedings of the American As- 
sociation for Artificial Intelli- 
gence, you'll see the papers broken 
down into categories such as AI ar- 
chitectures, cognitive modeling, 
knowledge representation, machine 
learning, and knowledge acquisition. 
The key words here are architec- 
ture, modeling, representation, and 
machine learning. The interest of 
much AI work has been to mimic 
human intelligence through the de- 
sign of structures that let machines 
store and manipulate knowledge. 
The users of AI systems, on the 
other hand, are interested in a to- 
tally different aspect of the problem. 
The lure of AI to corporations, scien- 
tists, educators, and _ individual 
authors is in the ability to communi- 
cate expertise via the medium of the 
computer. The current interest in 
hypertext systems represents an- 
other approach to the use of the 
computer to communicate complex 
knowledge. Because the ability to 
build structures is necessary in or- 
der to turn information and data 
into knowledge, any scheme that 
hopes to manipulate knowledge 
must be built around powerful but 
flexible structural concepts. 


I you look at the conference 


Bev and Bill Thompson are directors 
at Knowledge Garden Inc., Nassau 
N.Y. They have written extensively 
about AI systems and are the authors 


of KnowledgePro, KnowledgeMaker, 
and MicroExpert. 
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hypertext. 


by Bill and Bev Thompson 


When we began our design pro- 
ject, which eventually became the 
language KnowledgePro, our goal 
was to build a system in which the 
focus was on the communication of 
expertise as opposed to its represen- 
tation. This may sound like a mean- 
ingless distinction, but the switch 
in perspective affects the complex- 
ion of the system. In any design 
process, the designers are forced to 
make compromises. In saying that 
we would emphasize communica- 
tion, we meant that when we made 
design decisions, we would compro- 
mise on the side of ease of use and 
expressive power rather than code 
efficiency. 

In this article we will describe a 
structure called a topic that is the 
basic structural and storage unit 
used in KnowledgePro. A topic is a 
simple, uniform structure that pro- 
vides both data representation and 
control. Topics serve many pur- 
poses; they can behave as proce- 
dures, functions, variables, system 
commands, and hypertext nodes. 
We'll discuss how topics support 
backward chaining, inheritance, and 
list processing as well. 


Topics As Procedures 

In its most basic incarnation, a topic 
is very much like a procedure in a 
language such as Pascal. It begins 
with a declaration of its name and 
parameters and ends with an end 
statement. Between the beginning 
and the end, a series of program 





statements are included. Example 1, 
page 41, shows an example of sev- 
eral nested topics. 

Before discussing the topics in 
this example, we should say a few 
words about KnowledgePro syntax. 
KnowledgePro statements consist of 
the name of the command followed 
by a set of parentheses that enclose 
any parameters to be passed to the 
command. Each command ends 
with a period. Several of the most 
commonly used commands also 
have shorthand notations that make 
them more natural to express. 
Strings that include spaces or delim- 
iting characters are enclosed within 
single quotes. Words included be- 
tween (* and *) are comments. 

KnowledgePro programs are 
called knowledge bases. All com- 
mands in the knowledge base are 
associated with an undeclared topic 
called !main. Topics nested within 
!main are executed in one of two 
ways: directly using a do command 
or through a mechanism called back- 
ward chaining. Using the do com- 
mand is just like executing a proce- 
dure in C or Pascal. The command 
can be written using the uniform 
notation that uses the name of the 
command: 


do (‘which language’). 


or with a format more familiar to C 
and Pascal programmers: 


Which language’ ). 
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In either case parameters can be 
passed to the topic much as in C or 
Pascal. 


Backward Chaining 
Backward chaining is a technique 
used in PROLOG and by rule-based 
expert system shells. In a “conven- 
tional” programming language, 
when you use a variable that hasn't 
yet been assigned a value, the value 
of the variable is unpredictable. In a 
language that uses topics, there are 
no variables as such. The topic 
serves not only as a structural unit 
but also as the unit of storage. Val- 
ues can be both assigned to and 
retrieved from a topic. The dual na- 
ture of the topic makes it possible 
for an unassigned value to cause the 
execution of a topic in an effort to 
find its value. 

As an example, suppose we 
change the first line of the knowl- 
edge base in Example 1 to read: 


if ?’more about languages’ is yes 
then do ('which language’). 


and we add the following topic: 


topic ‘more about languages’. 
ask (‘Do you want to know more 
about languages ?’, 
‘more about languages’, 
[Yes,No)). 
end. (* more about languages * 


Here, the ? is a shorthand notation 
for the value__of command, so this 
expression can also be written as 
value__of (more about languages’). 
value__of requests a value for the 
topic more about language and, not 
finding a value, causes the com- 
mands associated with the topic 
more about languages to be exe- 
cuted. This topic contains an ask 
command that uses three parame- 
ters: the question, the name of the 
topic in which the answer is saved, 
and optionally a list that will place 
a menu of options on the screen. In 
this example the answer to the ques- 
tion is saved in a topic that already 
exists. If the topic selected was one 
that was not defined in the knowl- 
edge base, it would be created. 

If a statement containing ?’more 
about languages’ is encountered 
again in the knowledge base, it will 
not trigger the execution of the ask 








command but will merely retrieve 
the value of the topic. Of course, a 
topic can be considerably more com- 
plex than the one shown in the 
example. A topic whose execution 
has been triggered by the ? operator 
could trigger the execution of other 
topics either directly or through back- 
ward chaining. 


Topics As Variables 

The ? operator retrieves the value 
from a topic. A topic may be as- 
signed a value either as the result of 


topic ‘which language’ 


executing commands nested within 
itself, or it may be assigned a value 
as the result of another topic’s ac- 
tions. 

Along with values and associated 
procedures, topics have a series of 
properties that describe the number 
and kinds of values they may take 
on. By default, topics are unre- 
stricted in the number and kinds of 
values that may be assigned to them. 
It is possible, however, to restrict 
topics to a range of numerical val- 
ues, to a limited number of values, 


ask (‘What #mlanguage#m do you want to know more about 2 want, 


{Pascal,C, Lisp. Prolog}). 
do (?want). © 


topic language. 
window (). 
say(' 


Some people make a distinction between AI and 


"conventional" programming languages. 
languages certainly differ, 


Though individual 
for the most part, an AI language 


is one that was developed at a place where they happen to be 
doing Al.'}. 


close window (). 
end. (* language *) 


topic Pascal. 
Say (| 


When cing. Pascal to solve "AI types" of problems, 


you 


usually have to design low-level routines fo ane eee Linked 


list structures.'). 


end. (* Pascal 2) 


(* topics for , Lisp and Prolog would go here . 


end. (* which language *) 
































topic mark (find). 





window (). 

say (?7?text). 

close window (). 
end. (* mark *) 


topic animal. 
:legs = 4. 
dog ({). 

cat {). 

bird {). 






1, 2dog: legs, ' 
A cat has ' soak 4ege 
A bird has ~?bird: legs, — 












topic dog. 
end. {(* dog *} 






topic cat. 
end. (* cat *) 


topic bird. 
:legs = 2. 
end. (* bird *} 





end. (* animal *) 
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Example 1: Fragment of a KnowledgePro pre or knowledge b bake 


say ('One of the. powerful features of #mLisp#m is. ‘the abs 
to easily manipulate #mlist structures#m.'). 


text = read t threads.f1i1', concat ('/', 


Example 2: Using the default topic mark with hypertext 


(* The default number of legs for an anime) =) 
{7 These commands are used for initialization oe 


legs. 
iegs. 
legs.'). 


(* override the default *) 


Example 3: Nested topics showing how values are inherited 





?find), '/end'). 
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“How to protect your software 
by letting people copy it?’ 


By Dick Erett, President of Software Security 





Inventor and 
entrepreneur, 
Dick Erett, 
explains his 
— company’s 

-‘ \@ view on the 
protection of intellectual 
property. 





ment companies and the 

trade press seem to be miss- 

ing Or ignoring is this: 
Software protection must 
be understood to be a 
distinctively different 
concept from that com- 
monly referred to as 
copy protection. 


Fundamentally, software 
protection involves devising 
a method that prevents 
unauthorized use of a 
program, without restricting 
a legitimate user from 
making any number of 
additional copies or prevent- 
ing program operation via 
hard disk or LANs. 

Logic dictates that mag- 
netic media can no more 
protect itself from misuse 
than a padlock can lock itself. 

Software protection must 
reside outside the actual 
storage media. The technique 
can then be made as tamper 
proof as deemed necessary. 
If one is clever enough, 
patent law can be brought 
to bear on the method. 

Software protection is at 
a crossroads and the choices 
are Clear. You can give 
product away to a segment 







66 crucial point that aaa 
even sophisticated | 
software develop- : 





the program diskette as you wish. 


Data Back-ups : Use normal back-up and restore 
commands, including backing up sub-directories containing 


program files. 


\ 


Hard Disk Installation : Simply copy program disk 
to hard disk using DOS Command - Copy Ae *  C: 


Program Back-ups : You may make as many copies of 






Networks : This product may be 
ks. Follow the same installation 

+ 102 of this manual. The Block 
with the normal operation of any 


Soon all software installation procedures will be as straightforward as this. 


7 
3 
A 
g 





The only difference will be whether you include the option to steal your 


product or not. 


of the market, or take a 
stand against the theft of 
your intellectual property. 


“... giving your software 
away Is fine...”’ 


We strongly believe that 
giving your software away 
is fine, if you make the 
decision to do so. However, 
if the public’s sense of ethics 
is determining company 
policy, then you are no 
longer in control. 


We have patented a device 
that protects your software 
while allowing unlimited 
archival copies and unin- 
hibited use of hard disks and 
LANs. The name of this 
product is The BLOCK™ 

The BLOCK is the only 
patented method we know 
of to protect your investment. 
It answers all the complaints 
of reasonable people con- 
cerning software protection. 


In reality, the only people 
who could object are those 
who would like the option 
of stealing your company’s 
product. 


“*..eliminating the ratio- 
nale for copy-busting...”’ 


Since The BLOCK allows 
a user to make unlimited 
archival copies the rationale 
for copy-busting programs 
is eliminated. 

The BLOCK is fully pro- 
tected by federal patent law 
rather than the less effective 
copyright statutes. The law 
clearly prohibits the produc- 
tion of work-alike devices 
to replace The BLOCK. 









f/f, 


The BLOCK attaches to 
any communications port of 
virtually any microcomputer. 
It comes with a unique 
customer product number 
programmed into the circuit. 

The BLOCK is transpar- 
ent to any device attached to 
the port. Once it is in place 
users are essentially unaware 
of its presence. The BLOCK 
may be daisy-chained to 
provide security for more 
than one software package. 

Each software developer 
devises their own procedure 
for accessing The BLOCK 
to confirm a legitimate user. 
If it is not present, then the 
program can take appro- 
priate action. 


‘*... possibilities... 
limited only by your 
imagination...” 


The elegance of The 
BLOCK lies in its simplicity. 
Once you understand the 
principle of The BLOCK, 
hundreds of possibilities will 
manifest themselves, limited 
only by your imagination. 

Your efforts, investments 
and intellectual property 
belong to you, and you have 
an obligation to protect 
them. Let us help you safe- 
guard what’s rightfully yours. 
Call today for our brochure, 
or a demo unit.” 


O are 
sh Y inc. 


870 High Ridge Road Stamford. Connecticut 


06905 


203 329 8870 
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KNOWLEDGE-BASED LANGUAGES 
(continued from page 41) 


or to members of a set of specified 
legal values. 

Topics may be predefined in the 
knowledge base or created on the 
fly. This has the advantage of allow- 
ing the creation of complex struc- 
tures at run time. For example, the 
statements: 


ask(’Which cat do you wish to choose 
?’,cat__name, [Figaro,Flo, Babe)). 


‘needs a new flea 
collar.’ 


?cat_name = 


will produce a menu of choices and 
allow the user to choose one or 
several names. For each name cho- 
sen, a topic will be created if it 
doesn’t exist and the topic will be 
assigned a string. 

Designers of structured languages 
tell us that all data structures 
should be predefined and strongly 
typed. A reason often cited for this 
is that programs designed in this 
way are easier to debug and main- 
tain. Actually, debugging and main- 
tenance are functions of the pro- 
gramming environment. Strong typ- 
ing and predefinition of data struc- 
tures make the design of efficient 
compilers easier because at run time 
the program contains the location 
and type of most of its data struc- 
tures. Languages that create struc- 
tures at run time are dependent on 
efficient search routines to find struc- 
tures. 


Rules 

In the jargon of expert systems, an 
if.. then statement is called a rule. 
Rules can be expressed in the form 
shown earlier but can also share the 
formal notation of all KnowledgePro 
commands. The rule in our example 
has the following internal represen- 
tation: 


rule(eq(?(‘more about languages’), 
yes), delay([do (’which language’)})). 


delay is used to prevent the second 
half of the rule from evaluating until 
the first part is evaluated and re- 
turns a Boolean value of T. 

As you might suspect from look- 


ing at the example, system com- 
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Finally, a Window 7 
Library Complete 
with C Source & 
Make Files! 


AEWINDOS works with - 
e Borland Turbo C 1.5 
Microsoft 4.0/5.0/QUICKC 
Lattice C 3.1/3.2 

Power C 1.1 


ORDER NOW FOR A FREE 30 DAY 
NO-RISK TRIAL 


-AEWINDOS- 


writes directly to video memory for SPEED! 
writes through the BIOS for compatibility! 
over 100 library functions in K&R C! 

comes with a WYSIWYG window editor! 
documentation is TSR, hot-key into it! 


ria 





















Here is how it works, call toll free 1-800-634-5494 (499-7332 in Colorado) to order AEWINDOS. 












Evaluate the package for 30 days under No Obligation. If you like the package (and we’re betting you will), keep 
it. We'll bill you for $149.95 after 30 days. IF FOR ANY REASON you are not completely satisfied, just send it back. 


Available now for MS-DOS/PC-DOS. Look for MS-OS/2 and Unix versions this summer! 


1-800-634-5494 


Demo disk available for only $5.00. 


AEWINDOS 
by AESOFT 


TURBO C is a trademark of Borland International, Quick C and MS-OS/2 are trademarks of Microsoft, Power C is a trademark of 
MIX, Lattice C is a trademark of Lattice Incorporated, Unix is a trademark of AT&T Bell Labs, PC-DOS is a trademark of IBM. 
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Documentation | 
isa PAIN! | 
... Without DocuMotion™ _ 


We've found that well indexed and easily accessed documentation 
is a powerful tool. Now you can simply pop up DocuMotion to © 
access, display and print your documentation or guide reference | 
libraries. DocuMotion builds cross indexed document libraries 
from documentation contained in your source code or any text file. 
Version 3 adds great features like: folding documents, cross- 
referencing, 10 book marks, and a context-sensitive help interface. 


‘weer staply edits say ASCII file (text, 
ode, wenes, etc.) ved taserts the Boouitetion 


Fa v2.0 - le) Copyright 1907,1008 by BYP = Intelligent Solutions, Tee. 


e Runs memory resident or non- - 
resident on any IBM PC/XT/AT 
or compatible.  - 

* Compatible with all popular 
memory resident programs. 

® LAN compatible. 

DocuMotion is for YOU: 
Call NOW 1-612-884-5860 


Developer’s System $159.95 — : 


Seon: Reference Guides for 
your favorite tools...CALL. 


We need your expertise for reference guides. - 
Any Topic. Liberal royalties...CALL 


P.O. Box 20478 Bloomington, MN. 55420-0478 _ 


e Your documentation is available 
ANYWHERE, ANY TIME. 

e Access, display and print your 
documentation by name or by 
user-defined categorization trees. 

e Your choice -- pull-down menus 
or intuitive accelerator keys. 

e Powerful print & copy functions. 


.. for Project Managers: 
© Programmers produce more and 
better documentation. 
® Reduced function redundancy. 
© Greater programmer productivity. 


N 
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® Slash your Total Development Effort... 
From Prototyping To Completion | 
OU You'll get live results fast—even before you write the 
, first line of code. Ideas become running applications in a 


few hours. 


: . Designer, the front-end application generator, allows 
SIX O ONS you to produce major programs with no coding. It 
eliminates prototyping as a preliminary step because design 
and source code generation are done concurrently. You can 
implement a dazzling color screen or a report in minutes. 
You'll probably never code a screen again! 
Ou (C Automatically Generate Commented 
Source Code For Your Entire Application 
, N powerful application generator in the industry. It creates 
e a structured source code that is fully commented. You can 
easily add to it, modify it, or just admire it. 
And The Professional Developer is a complete develop- 
e ment environment with all the tools that you need. 
Ol | Cd 1O} IS Create High-Speed, Bullet-Proof Data 
Management With Built-In LAN Support 
Advanced techniques allow you to tune your data 
In management to fit each application. Use related files, data 
I encryption, memo fields, automatic recovery, and commit 
I i & and rollback—all without compromising Clarion’s high 


level of performance. And complete LAN features are 
included so the applications you develop will run on your 
network without any additional run-time or LAN PACK cost. 


Interface To Your Own C or Assembler 
Routines For Special Requirements 


The Professional Developer will support device drivers 
and complex logic written in C and Assembler. You won’t 
have to re-write all those existing routines. You can 
produce completely open-ended solutions that can grow as 
your needs or requirements change. 


The Professional Developer’s Designer is the most 


Produce Executable Programs That Don’t 
Need Run-Time Systems 


Compile your application into an .EXE program that will 
run on a stand-alone computer or workstation so you can 
distribute your programs without costly run-time systems. 


Getting Started Is Easy. You’ll Be 
Productive The First Day. 


Although there’s a lot of horsepower “under the hood,” 
you'll be producing programs soon after you open the 
package. You'll find the whole environment friendly and 
comfortable. PC Week says: “Clarion is easy to learn and 
easy to use.” 
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mands are themselves topics de- 
fined internally but behave in all 
other ways like user-defined topics. 
In an application the internal topics 
can be overridden by defining a 
topic with the same name within 
the knowledge base or by using a 
topic written in another language 
and included in an external library. 
The same technique can be used to 
create new topics that extend the 
language. 





Hypertext and Topics 
Returning to the example in Exam- 
ple 1, let’s look at the first line in the 
topic which language: 


ask (‘Which #mlanguage#m would 
you like to know more about ?’, 
want, [Pascal,C,Lisp,Prolog)). 








































We've already described how the ask 
command works, but if you look 
closely, you'll notice that the text of 
the question includes the word lan- 
guage enclosed within the charac- 
ters #m. This notation is used to 
define a hypertext node. Any text 
marked in this way is displayed on 
the screen in inverse video (or in 
any color selected by the applica- 
tion designer). The user of the appli- 
cation can use a function key or a 
mouse to move among highlighted 
concepts. When a concept is se- 
lected, the topic of the same name— 
for example, language—is executed. 


The commands, window, 
close__window, and say are self-ex- 
planatory. Here, window’ and 


close__window use default values, 
but they can also include parame- 
ters that specify title, color, size, and 
location of the windows selected. 

If no topic with the same name 
can be found, the system will next 
search for a topic called mark and, 
if it finds it, will pass the hypertext 
phrase to mark as a parameter. Ex- 
ample 2, page 41, shows an example 
of one way in which this feature is 
used. In the knowledge base in Ex- 
ample 2, all the text threaded to 
hypertext nodes is stored in an ex- 
ternal data file called thread fil. 
When the say command displays its 
message, the Lisp and list structures 
are highlighted, but no topics with 
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If it's all out warfare 

in today's software 
marketplace, youd better 
have the best weapons. 


Phar Lan 386 
development tools. 
The best weapons. 


Phar Lap 80386 development tools let you take full advantage of 386 protected 
mode architecture. You can break the 640K limit in the language of your choice; 
C, Fortran, Pascal, or Assembler. 

For fast compact code, use 386! ASM, our full-featured 80386 assembler that’s 
upwardly compatible with the MASM* 8086 assembler. Existing DOS and main- 
frame applications written in a high level language are easily ported by recom- 
piling. And 3861! LINK,our 32-bit native mode linker, puts it all together. 

Debugging is made easy too. With our 386 symbolic debugger you can debug 
applications written in assembler or any high level language. Best of all, with 
Phar Lap’s 386! DOS-Extender* you can run your native mode program on any 
386-based PC running MS-DOS* And you have full access to DOS system serv- 
ices through INT 21. 


NO COMPATIBILITY PROBLEMS 


Phar Lap’s tools are compatible 
with the industry’s leading sys- 
tems: DESKPRO 386% IBM Model 
80* accelerator boards such as 
Intel’s Inboard* 386 and 386 
clones. Not only will your new 
applications be compatible 
with the leading systems, they'll 
run alongside all other DOS 
applications. 








NO ROYALTY PAYMENTS 


Once your 386 application is 
complete, all you pay is a low 
one-time fee to license 386! DOS- 
Extender for redistribution. This 
allows you to embed 386!DOS- 
Extender in your application so 
your customers can run it on any 
386-based PC. Just one payment 
and you unlock the entire DOS 
market. We don't believe ina 
software tax on every sale. 


Don’t wait for 0S/3, get a jump on the competition today. 
Choose your weapons now. 


$495 3861 ASM/LINK — Package 
includes 386 assembler, linker, 
MINIBUG debugger and 386! DOS-Extender 
$895 MetaWare 80386 High C* compiler 
$895 MetaWare 80386 Professional 
Pascal* compiler 
$595 MicroWay NDP Fortran-386* 
compiler 
$195 386| DEBUG symbolic debugger 


(617) 661-1510 


PHAR LAP SOFTWARE, INC. 
60 Aberdeen Avenue, Cambridge, MA 02138 


“THE 80386 SOFTWARE EXPERTS” 





Phar Lap and 386! DOS-Extender are trademarks of Phar Lap Software, Inc. MS-DOS and MASM are registered trademarks of Microsoft Corp. 
DESKPRO 386 is a trademark of Compag Corp. Inboard 386 is a trademark of Intel Corp. NDP Fortran-386 is a trademark of MicroWay, Inc. 
High C and Professional Pascal are trademarks of MetaWare Incorporated. IBM Model 80 is a trademark of IBM Corp. 
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The Janus/Ada Difference... 
More Than Just the Price! 


Contrary to what you may believe, all Ada compilers are not equal. The popular misconception is that 
all Ada compilers are the same for any machine, just differently priced. But the price is just one of the 
differences. Compilation speed, the ability to emulate floating point; usability on all of the Intel 80 X 86 
family, as well as support of networking sites, can make a big difference to your project. That big differ- 
ence is the Janus/Ada difference!!! 


Janus/Ada is substantially different from other Ada compilers. It was developed on the microcomputer, 
for the microcomputer, and was bootstrapped version by version. The resulting compiler is faster, more 
robust and more flexible than other Ada compilers. Minimizing the expenses of add-on hardware, run- 
time library fees and tutorials also makes Janus/Ada different. Take a look at the charts below and see 
what we mean when we say we're different. 





Product Features: Janus/Ada 2.0 Compiler A 3.2* Compiler M 2.0* 
80 X 87 emulation YES NO NO 
Royalty free run time libraries YES NO NO 

Site licensing YES NO 

All 80 X 86 covered YES NO 

Tutorial included with all Paks YES NO 

Ada applications for only $42 YES NO 

Runs On floppy disks YES** NO 

Validation Suite ACVC 1.9 ACVC 1.8 ACVC 1.8 
Validated compiler cost $99.00 $3,000.00 $795.00 


“Comparisons made on product information obtained on 12/14/87. 
**3%", 720K Floppies and 5%”, 1.2M Floppies only. 





The differences don't end with the facts above; the performance issues, which make or break a produc- 
tion compiler, demonstrate why Janus/Ada is not just different, but better! 


Compile and Link Janus/Ada Compiler A Compiler M 
Timings”: 

sieve 0:50 1:39 nize 
Calculation 0:43 244 1:00 
Disk Write 0:45 1:33 1225 
Disk Read 0:43 1:34 4:23 
Integer Sort 0:47 Zs Ti4 
Dynamic Allocation 0:47 2:02 Vid 
Matrix Inversion 0:46 2:24 1:39 
Recursion 0:47 Z:A0 1:34 





**(These results are from BYTE Magazine, July 1987 issue; full details on the tests, as well as the standard equipment used, can be found in that issue.) 


Our seven years of providing quality Ada software to over ten thousand users reflects the commitment 
we have to your programming needs. Our policy has always put you, the customer, first and foremost. 
We think it's a difference you can appreciate! You can order our “JET SET” re compiler and tutorial) 
for only $99, Please call our toll free number 1:8O0-722:3248 (1:8O0:PC ADA 4 U) to place your order or 


request our products brochure. 
©Copyright P.R. Software, inc., 1988." 








; Siler cones INC. specialists in state of the art programming 
Ce emma 1 P.O. Box 1512 Madison, Wisconsin 53701 
ee soe (608) 244-6436 TELEX 4998168 1-800-722-3248 
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KNOWLEDGE-BASED LANGUAGES 
(continued from page 45) 


these names are defined. If the user 
selects one of these—for example, 
Lisp—the topic mark is executed 
and passed Lisp as a parameter. The 
first line in mark assigns a value to 
the topic text, which is also created 
at this time. The value assigned is 
the result of the read command. 

read uses three parameters: the 
name of the file to read, where to 
begin reading, and where to stop 
reading. The command concat re- 
turns /Lisp, which is the result of 
concatenating the character / onto 
the value of the topic find. All text 
following this string and up to the 
string /end is assigned to the topic 
text. A window is opened; the value 
of text, which might be several pages 
long, is displayed; the window is 
closed; and control returns to the 
statement from which the hypertext 
was selected. 


Nested Topics and 
Inheritance 

Topics can be nested inside other 
topics to form a hierarchy, which 
allows you to package pieces of a 
knowledge base into self-contained 
units. A topic defined within an- 
other topic is normally accessed 
only from within that topic. Nor- 
mally, KnowledgePro searches for a 
topic by examining the topics de- 
fined within the current topic. If 
none of these is the one being 
sought, it examines the parent topic 
to see if the topic is defined there. 
KnowledgePro doesn't look at topics 
nested within those defined at the 
parent level. Nested topics are nor- 
mally invisible from the outside; they 
are only found through the hierar- 
chical search process. The search 
continues up the hierarchy until the 
topic is found or the topic !main is 
examined. 

Example 3, page 41, shows an ex- 
ample of a nested topic. If dog is 
referenced outside of animal, it 
won't be found unless the full name 
animal:dog, which defines its loca- 
tion in the hierarchy, is specified. 
The hierarchical structure allows top- 
ics to inherit values from other top- 
ics. Example 3 shows a knowledge 
base that describes some properties 
of some common animals. The com- 
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mand animal (). will display the 
following message: 


A dog has 4 legs. 
A cat has 4 legs. 
A bird has 2 legs. 


The default value for legs is set to 
4. The topics dog, cat, and bird are 
then executed. Of these topics only 
bird contains an override value. The 
: before the name legs in this topic 
tells KnowledgePro that this legs is 
a local topic, not the one defined in 
animal. Because this topic doesn't 
exist, it is created. When a value is 
sought for each of these items in the 
say statement, both dog:legs and 
cat:legs are assigned the default 
value of 4 because no override was 
specified. 


List Processing 

Lists are integral to all topics. Each 
parameter passed to a topic is actu- 
ally a list. For example, the first pa- 
rameter of an ask command is the 
question. So far, you've seen ques- 
tions made of simple text expres- 
sions; however, because each pa- 
rameter can be a list, more complex 


NOW! 
SHIPPING 


displays can be created, as in this 
example: 


ask (['The total cost is $’, 
?price * ?’number of items’, 
‘How will you pay ?’), 
pay,[Check,’Credit card’)). 


Here, the question is a list con- 
taining three items: a literal string, 
the result of multiplying the value 
of the topic price by the value of the 
topic number of items, and a final 
literal string. 

Turning back for a moment to 
Example 1, you can see another ex- 
ample of the use of lists. The re- 
sponse to the question What lan- 
guage do you want to know more 
about? can include more than one 
item from the list of menu items 
[Pascal,C,Lisp,Prolog]. The answers se- 
lected are stored as a list that is 
assigned to the topic want. Let's say 
that the answers selected were C 
and Prolog. When the command do 
(?want). is executed, each topic in 
the list assigned to want will be 
executed, so the first topic, C, will 
be performed and then the topic 
Prolog will be executed. 


Toni, 


VI Editor and Utilities 


NOW! 
VI! 
YES! 
YES! 
YES! 


e@ EDITOR: VI. EX. view and ctags. New features: 
Multiple screens, 25/43/50 lines, function keys, 


-bak, color, and etc. 


@ FILE MANAGER: ¢P: heed. Is. mv, pwd. rm, sum, 


touch, version, which and whereis. 


e TEXT HANDLER: cat. cmp. diff. grep, od, strings. 


tail, and we. 


e MULTI-TASK: kill, log, nice, tee and utime. 
® OTHERS: cal, pr and printer spooler. 


V) || Max Ware sermun rave sseree 


1 1265 Payne Drive, 
Los Altos, Ca. 94022 





No waiting, the same program runs on OS/2 (PROTECTED 
and REAL modes) and on DOS 2.X or 3.X without modification. 


Includes the programmer's favorite screen editor — VI COMPATIBLE. 
More than 1,000,000 UNIX programmers now use VI. 


Helps you port the DOS applications onto OS/2. Great for C, ASM, 
PASCAL, DBIII+, BASIC programs and others. 


No need to do CROSS development on UNIX any more; with 0S/2 
and ADOS+ you can develop and test programs on the same Machine. 


Many smart features are added, making ADOS+ the most powerful 
utilities for OS/2. Yet it’s still compatible with DOS and UNIX: tools. 


ADOS+ ENHANCED FEATURES: 


@ Copy files with: subdirectories, multiple 
volumes, only the new files, verbose. 


@ List the files and display the free disk 
spaces in many formats. 


@ Remove multiple files or subdirectories. 


@ Show subdirectory differences, support 
large text file comparison. 


@ On-line help and examples. 
@ Easy to use and fast. 


ONLY: $179 for 0S/2 & DOS, 
$99 for DOS 3.X, 2.X 


(415) 960-1150, FAX (415) 966-1786 


TRADEMARKS: OS/2. PC/DOS are trademarks of IBM, MS OS/2, MS DOS are trademarks of Microsoft, UNIX is trademark of AT&T 
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Video Courses. 


Artificial Intelligence 
in Depth 


by Dr. Paul R. Coben 


> The 25 lectures in this course pro- 
vide a fast-paced introduction to Arti- 
ficial Intelligence ideas, including 
search, planning and problem solv- 
ing, expert systems, natural lan- 
guage, computer vision, logic, reason 
maintenance, reasoning under un- 
certainty, blackboards and sophisti- 
cated control, and machine learning 
The course is taught as part of the 
graduate curriculum at the Univer- 
sity of Massachusetts, and features 
guest lectures by Professors Victor 
Lesser, Allen Hanson, and Daniel 
Corkill. The lectures and review ques- 
tions focus on research issues, though 
no prior background in Al ts required 
of the diligent student. 


Dr. Paul Cohen is an Assistant Professor of Com- 
puter Science at the University of Massachusetts, 
Amherst, where he is Director of the Experi- 
mental Knowledge Systems Laboratory. He is a 


Expert Systems: 
Theory and Practice 


by Dr. Paul R. Cohen 


© This highly popular course is now 
available as a self-study videotape 
training package, including 12 hours 
of videotaped instruction, detailed 
lectures notes, over 300 illustrations, 
study questions, a bibliography, and 
suggestions for further reading. The 
lectures consist of an introduction, 
discussions of rule-based, frame- 
based, and optimization-hybrid sys- 
tems. The second half of the course 
addresses research issues including 
control, uncertainty, learning, expla- 
nation and knowledge engineering. 


co-editor of The Handbook of Artificial Intelli- 
gence. 

Dr. Daniel Corkill is a Research Computer Scien- 
tist at the University of Massachusetts, Amherst. 


Programming in 
Common Lisp 


by Dr. Daniel D. Corkill 


BB nis series of eight, one and one- 
half hour sessions on Programming 
in Common Lisp was developed for 
programmers with no experience with 
Lisp. Topics include recursion and 
mapping, functions, complex data 
structures, control forms, 1/0, 
macros, and compiling. The course 
emphasizes programming style. Each 
videotape contains several exercises to 
be attempted while the tape is paused; 
each exercise is subsequently dis- 
cussed with detailed examples. Ide- 
ally, two or more individuals will 
work together on a Lisp system to dis- 
cuss and solve the exercises. 


He is the originator of CLISP, has extended Com- 
mon Lisp for multiprocessing, and recently de- 
veloped a generic blackboard implementation 
system called GBB. 


The Minerva Group is a team of researchers and teaching professionals that provides advanced 
education on Al technology currently being developed at research centers thro ughout the United 
States. The courses present the knowledge required to build state-of-the-art systems as well as 
concepts and techniques for solving today’s expert systems problems. 


The Minerva Group 


Call (603) 643-6349 or Write to P.O. Box 835, Amherst MA 01004. 
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Lists enable you to manipulate 
groups of related items. In one knowIl- 
edge base we examined recently, the 
designer had a long set of rules with 
each rule having only one condi- 
tional clause, as in this example: 


if 7lot is K10 
then item is 3A62. 


if ?lot is A22 
then item is 6H77. 


topic lot. 
ask ('What is the lot number on the 
remaining section ?’,lot, 
[KIO A2zZ,... J}. 
end. 


This entire set of rules, no matter 
what its length, could have been 
expressed in four lines using lists: 


lot__list is [K10,A22,. . .]. 
item__list is [3A62,6H77,. . .]. 
ask ('What is the lot number ?’, 
lot,?lot__list). 
item is element (?item_ list, 
where (?lot__list, ?lot) ). 


When the question is displayed, the 
contents of the topic /Jot__list are 
displayed on the menu. The item 
selected—for example, 6H77—is as- 
signed to the topic lot. The evalu- 
ation of the last line begins by find- 
ing where the value selected, 6H77, 
is located in the list lot__list. The 
value 2 is returned as the result of 
the where command. Next, the ele- 
ment command returns the second 
item of the list contained in 
item__list and this value is assigned 
to the topic item. 

Many other list-handling com- 
mands are necessary for a high-level 
symbolic language. These include 
commands such as first, last, and 
rest (similar to the LISP commands 
car, last, and cdr) that let you tear 
apart lists. KnowledgePro also in- 
cludes commands for combining, 
comparing, and constructing lists in 
a variety of ways. 


Summary 

The flexibility of the hypertext and 
the directness that comes with pro- 
cedural control make it possible for 
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people with little or no program- 
ming experience to sit down and 
easily express their expertise. At the 
same time, techniques such as back- 
ward chaining, inheritance, and list 
handling enable it to be used in 
complex symbolic computational 
problems. With languages built 


around these types of structures, it 
becomes possible to design applica- 
tions that allow program control to 
be shared by both the designer and 
the user of the system, surpassing 
the rigidity of the current expert 
system technology and the free-form 


environment of hypertext media. 

Readers interested in seeing a sam- 
ple of the KnowledgePro environ- 
ment can obtain a run-time version 
from CompuServe: go PCVEN (data 
library 8). Several free demo pro- 
grams, including TextPro (a program 
for writing and reading short hy- 
pertext documents), are available. 
Source code is included with the 
demos so you can get an idea of 
how topics work. 

DDI 


Vote for your favorite feature/article. 
Circle Reader Service No. 2. 


“Developing my application in C would have taken 6 months to a year, but in Actor it took 2 
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or not 
to Gu.” 










—Brian Fenske, Boeing Commercial Airplane Company 


cor CC ACTOR 





Actually, you don’t have to make the 
choice. Once C was ideal for all PC pro- 
gramming. But it has been complicated by 
windowing and graphical interfaces. Now 
windows development with C is difficult, 


time-consuming and error-prone. You 
need a new language that simplifies win- 
dows programming. Introducing Actor® 


Actoris the first interactive object-oriented language made for commercial development. 
Its powerful browsers, inspectors and debuggers give you more insight into a windowing 
environment than C ever will. But your C work is not lost. C libraries can be linked to Actor. 
Plus, its procedural syntax is easy for C programmers to learn. 


Actorcomes with windowing classes built in. Customize Actor’s classes to create stand- 
alone windowing applications. And objects give you another layer of independence for a 
smooth transition to OS/2 and Presentation Manager. It’s the quickest and easiest way to write 
a windowing program. 


“You can write Windows programs much faster with Actor than with C or assembly language.” 
—PC Magazine, June 9, 1987 











Tech Specs 





Actor $495 ¢ Academic price $99 * Academic site license $99 e Manuals for site 
license $35 ¢ New! Language Extension $99 ¢ Shipping $5 US, $25 Int'l 
The Whitewater Group 


Technology Innovation Center 
906 University Place, Evanston, Illinois 60201 


(312) 491-2370 


Actor is a registered trademark of The Whitewater Grou 
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ARTICLES 


Theorem Provin 





Using Semantic 
Resolution 


Resolving those nasty semantic clashes with C 


ne expects the resolution 
principle—a simple rule of 
inference useful in theorem 


proving—to date back to antiquity, 
along with modus ponens and 
Euclid’s elements. In fact, though, it 
was discovered as recently as 1965 
by JA. Robinson and constituted a 
major breakthrough in mechanical 
theorem proving. It is surprising that 
such a powerful and (it seems now) 
obvious result did not surface much 
earlier. 

Since 1965, the resolution princi- 
ple has undergone many refine- 
ments. One such refinement—seman- 
tic resolution—is discussed in this 
article. To avoid becoming mired in 
the complexities of formal logic, I 
will restrict my attention to proposi- 
tional logic. Although the power of 
propositional logic is limited, it is 
nevertheless an ideal vehicle for pre- 
senting the essential aspects of se- 
mantic resolution. (See Listing One 
page 64.) 





Basic Definitions 

I will use the symbols &, v, —>, and 

—7 to represent the logical opera- 

tions conjunction, disjunction, im- 

plication, and negation, respectively. 
An expression (called the conclu- 


Anthony J. Dos Reis is an assistant 
professor at the College at New Paltz, 
Dept. 6f Mathematics and Computer 
Science, New Paltz, NY 12561. 
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by Anthony J. Dos Reis 


sion) is said to logically follow from 
a set of expressions (called the prem- 
ises) if the conclusion is true when- 
ever the premises are all true. A 
conclusion with its premises is 
called an argument. An argument is 
valid if its conclusion logically fol- 
lows from its premises. The conclu- 
sion in a valid argument is called a 
theorem. 

A literal is a variable or the nega- 
tion of a variable. A clause is either a 
single literal or a disjunction of liter- 
als or is empty (denoted by the sym- 
bol //). Examples of clauses are [ J, 
Pp, 7q, Pp Vv —q, and —~pvqvr.A 
variable and its negation (for exam- 
ple, p, —p) is called a complemen- 
tary pair. The assignment of a truth 
value to every variable under consid- 
eration is called an interpretation. A 
set of clauses is unsatisfiable if for 
every interpretation at least one 
clause in the set is false. 

Expressions with identical truth 
table values are said to be equiva- 
lent. It can be shown that any logi- 
cal expression can be transformed 
to an equivalent expression consist- 
ing of either a single clause or a 
conjunction of clauses. For example, 
the expression (p v g) —> r can be 
converted to the equivalent expres- 
sion (—p v r) & (—q v r). Thus, 
without loss of generality, we can 
restrict our attention to logical ex- 
pressions of this standard form. In 
fact, we can restrict our attention to 





individual clauses because a con- 
junction can be viewed as several 
individual premises or conclusions. 
For example, the premise (—p v r) 
& (—q vr) can be viewed as two 
premises—(—p v r) and (—q v r)— 
each a single clause. 

To prove that a conclusion logi- 
cally follows from its premises in 
propositional logic, you simply need 
to construct a truth table and deter- 
mine if the conclusion meets the 
definition of logically follows. Al- 
though this approach is eminently 
satisfactory for propositional logic, 
it unfortunately falls apart in more 
powerful logic systems (such as first- 
order logic) in which truth tables 
may not be of finite size. For such 
systems rules of inference are used 
to establish whether a conclusion 
logically follows from its premises. A 
rule of inference is a rule that de- 
scribes how to generate a new ex- 
pression that logically follows from 
existing expressions. The step-by- 
step derivation of the conclusion 
from the premises using rules of 
inference is called a proof. 

Typically, you need many rules of 
inference to generate the expres- 
sions needed in a proof. For exam- 
ple, the rule of inference modus po- 
nens given by: 


E1 -—> E2 


F1 
., E2 
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cannot be used to show that —p 
logically follows from p -> q and 
—-q because the premises are not of 
the appropriate form. Modus ponens 
by itself is not complete—that is, 
there are valid arguments whose 
conclusions cannot be generated us- 
ing modus ponens alone. 

A serious problem with having 
many rules of inference is that it is 
necessary to select the appropriate 
rule at each step in a proof. The 
appropriate rule is, in general, not 
obvious. You could, of course, try 
every rule at every step, but such a 
brute-force approach is very ineffi- 
cient in time and space. 


The Resolution Principle 

The resolution principle is a rule of 
inference given by the four forms 
shown in Table 1, below. 

Resolution requires two clauses 
(the clauses to be resolved) with a 
complementary pair—that is, one 
clause should contain some expres- 
sion E1 and the other —E1. The 
resolvent—that is, the clause gener- 
ated—is formed from the expres- 
sions that remain after E1 and —E1 
are thrown away. If more than one 
expression remains (as in the first 
form in Table 1), the resolvent is the 
disjunction of these expressions. If 
no expressions remain (as in the 
fourth form in Table 1), the resolvent 
is the empty clause, denoted by /]. 
Because disjunction is commutative, 
the order of the expressions is not 
important. 

If two clauses that both contain 
some expression E are resolved, the 
resolvent need not have two occur- 
rences of E because E v E always 
equals E. For example, you can take 
the resolvent of p vq vr and ~p v 
q to be qvr rather than qv qvr. 

If clauses that have more than 
one complementary pair are re- 
solved, only one complementary 
pair is eliminated. For example, if 
you resolve p v gq and —p v ~q, you 
get either g v —q or p vp, depend- 
ing on which complementary pair 
you eliminate. Here the resolvent is 
always a tautology (that is, an ex- 
pression that is always true) and 
therefore logically follows from any 
set of premises. In refutation proofs 
(see later), such resolutions are use- 
less and should never be performed. 

In the following example, 6 
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a 


through 9 are obtained by resolu- 
tion. Each is labeled with the line 
numbers of the expressions from 
which it is derived. 


1pv—~qvr 
2pvqvs 

3 7p 

4—r 

5 —7S 

6pvrvs (1,2) 
7pvr (5,6) 
8r (3,7) 
9[] (4,8) 


The rule of inference modus po- 
nens given in clause form: 


—E1 v E2 
E1 
Ee 


is clearly a special case of the resolu- 
tion principle. Other rules of infer- 
ence—modus tollens, hypothetical syl- 
logism, disjunctive syllogism, con- 
structive dilemma, and destructive 
dilemma—are also special cases of 
resolution. That resolution encom- 
passes all these rules is an indica- 
tion of its power and generality. 


Proof by Refutation 
Suppose you wish to show that the 
argument: 


P1 


Oo 
ElVEe 

—E1vES 

SECvES . 


py q 
Failure 
Node 


Figure 1: Binary tree 





P2 
premises 
Pn 
na conclusion 


is valid—that is, C logically follows 
from P1, P2, ..., Pn. The straightfor- 
ward approach is to derive C from 
the premises using rules of infer- 
ence. Another approach—called 
proof by refutation—is to negate the 
conclusion and then derive the 
empty clause from the premises and 
the negated conclusion. I'll first look 
at an example and then discuss why 
this approach works. 

To show that the following argu- 
ment is valid: 


—pvr 

ee yt premises 
p 
ir conclusion 


first negate the conclusion and add 
it to the premises. Then using rules 
of inference, derive the empty 
clause: 


1—pvr 
BEVEL 


negation of the conclusion 
(1,3) 
(2,4) 


) Inference 
\ Node 


q 
| Failure 
Node 
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derived from the initial clauses us- 
ing a rule of inference. But because 
r and —r always have opposite 
truth values, they cannot both be 
true. The assumption—that the in- 
To understand why this approach itial clauses are all true—must be 
works, first note that the generation | false. Thus, whenever clauses 1, 2, 
of the empty clause (line 7) requires | and 3 are all true, clause 4 (the 
the resolution of an expression and | negation of the conclusion) is false 
its negation, r and —r. Now assume | and the conclusion is true. 
that the initial clauses (1, 2, 3 and 4) Although proof by _ refutation 
are all true. Then both r and —r | seems like a roundabout way of prov- 
must also be true because they are | ing a theorem, it is actually more 


SEMANTIC RESOLUTIONS 
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v4 (5,6) 
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suitable for machine implementa- 
tion than the straightforward ap- 
proach for two reasons. First, the 
goal of the refutation approach is 
an empty clause, which is generally 
easier to derive because it may be 
obtained from any one of perhaps 
several complementary pairs. For ex- 
ample, another possibility for the 
previous proof is to derive —t and t, 
as follows: 


i——-pVr 

2—rvt 

3p 

4—t negation of the conclusion 
oT (1,3) 

6 t (2,5) 

7[] (4,6) 


Second and even more important, 
resolution is complete when used 
in a refutation proof—that is, if the 
original argument is valid, then the 
empty clause can always be derived 
using only the resolution principle. 
Our bagful of inference rules is not 
needed. 


Completeness of Resolution 
The basic idea in the proof of the 
completeness of the resolution prin- 
ciple can be illustrated by consider- 
ing a simple example. Suppose the 
set of clauses from which the empty 
clause is to be derived is {—p, p v 
—q, q}: Construct a binary tree as 
follows: 


1. Start with an unlabeled root node. 


Now repeat steps 2 and 3 for each 
variable V that appears among the 
set of clauses (in this example, steps 
2 and 3 will be done twice—once for 
V=p and once for V=q): 


2. Extend the tree from any unla- 
beled leaf node by adding two 
branches that terminate on two new 
nodes, the left and right of which 
represent the assignment of true 
and false, respectively, to V. 

3. If the truth assignment associated 
with all the nodes in the path from 
the root to a node added in step 2 
makes a clause false, then label that 
node with that clause. (Labeled 
nodes are called failure nodes.) 


The tree constructed correspond- 
Ing to this example is shown in 
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The Graphics Toolkit for 
Contemporary Software Developers 


Already the fastest and most 
powerful graphics toolkit on the 
market, the new HALO” delivers 
subroutines and device support for 


Ocal i rareemeeyal Conn eer a ary eye) ea eeny 


in publishing, office automation, 
vision, and image processing. 


HALO ‘88 is a device independent 
library of 190 graphics subroutines. 
It is compatible with 18 

programming languages, and over 


140 hardware devices such as image 


scanners; graphics, vision, and 
imaging boards; printers and 
plotters; and mice. HALO ‘88 is 
designed for the complete IBM 
compatible microcomputer line 
including the PS/2 and VGA. 


OE Okay e 
yas 
Applications 

HALO ’88 has new subroutines: 


which control scanners and scanned 


Tea tel xen A COR TNITTCoromAAnT COREL ES 
larger than screen resolution and 
available memory. Extended 
character set support enables 


software developers to address IBM's 


full 255 characters in graphics and to 


design foreign language fonts. 
Among contemporary HALO ‘88 
applications are CAD, Computer- 
Based Training, Presentation 
Graphics, Graphic Arts, Mapping, 
Machine Vision, Silicon Wafer 
Manufacturing, Sound System 
Design, Vehicle Scheduling and 
Routing, and Real Estate. 


wT ON eat 


HALO has an installed base of 
60,000 + end-users, hundreds of 
site-licensed corporations, 
government agencies, universities, 
and national laboratories and most 
importantly, over 220 Independent 
Software Developers (ISVs) who 


market applications written with 
HALO. 


HALO ’88 provides the software 
e(ers teat mmnesleamearomece ntact 
environment of graphics functions; 
the programmer with reliable and 


“HALO. 


infinite possibilities in 
graphics and imaging 
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well-documented tools, and DP 
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interface and database format. 


Reach for the Future 


If you need high performance 
graphics development software that 
provides a migration path to OS/2 
and other future technology, follow 
the industry leaders — call (800) 992- 
HALO (4256). | 


HALO ’88 is just $325 and includes 
all device drivers, 20 fonts, your 
choice of one compiler binding, 
completely new documentation, an 
interactive tutorial and free 800# 
technical support. Update from 
HALO for $150. 


Ask about the new HALO _ 
Programmers’ Workbook which 
provides C program examples for 
HALO ’88 applications developers. 


media cybernetics 
8484 Georgia Ave. 

Silver Spring, MD 20910 

(301) 495-3305, (800) 992- HALO 
HALO is a registered trademark of Media Cybernetics, Inc. 


IBM PS/2, VGA and OS/2 are registered trademarks of 
International Business Machines Corp. 








“A Cure For The 
on Cold” 


Do you suffer from the following symptoms? 


a 
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Applications take forever 
Grueling maintenance 
Locked out of source code 
Sacrifice portability 
Clients are waiting... 





FairCom 
4006 West Broadway 
Columbia, Missouri 65203 


314/445-6833 
FAX 314/445-9698 





The following are trademarks as noted: UNIX/AT&T, XENIX/Microsoft, Inc., MACINTOSH/Apple Computer, Inc., VAX/DEC 


CIRCLE NO. 139 ON READER SERVICE CARD 
54 Cea : 


SEMANTIC RESOLUTIONS 
(continued from page 52) 





Figure 1, page 51. Observe that every 
leaf node must be a failure node 
because otherwise an interpretation 
would exist that satisfies the set of 
clauses. Moreover, at least one node 
(called an inference node) must have 
two failure nodes immediately be- 
low it. Because the truth assign- 
ments associated with these failure 
nodes differ for exactly one variable, 
their corresponding clauses must 
contain exactly one complementary 


For resolution 
to be practical, 
it must be restricted 
from generating too 
many unnecessary 
resolvents 





pair and are therefore resolvable. Fur- 
thermore, the resolvent is false (in 
the sense of step 3 above) for the 
inference node. Thus, the inference 
node can be labeled with the re- 
solvent (making it a failure node) 
and the two nodes below it pruned. 
Thus, you get the tree shown in 
Figure 2, page 55. 

The same argument can be ap- 
plied repeatedly, resulting in further 
pruning (and resolution) until only 
the root node remains, correspond- 


ing to the derivation of the empty 
clause. 


Semantic Resolution 

In a resolution proof, the clauses to 
be resolved must be selected at each 
step. In general, there may be many 
resolvable clauses that produce re- 


solvents that are not required for 
the proof. For example, consider: 


Ipvq 
2pv—q 

3 =pvq 
4—pv—q 

> P (1,2) 
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(3,4) 
(5,6) 


6—p 
71) 


The resolvents (1,3), (2,4), (1,6), (2,6), 
(3,5), and (4,5) are not needed for the 
proof and are, therefore, wasteful to 
generate. A mechanical theorem 
prover, however, unless otherwise 
constrained, would typically gener- 
ate such resolvents. For resolution 
to be practical, it must be restricted 

_ from generating too many unneces- 
sary resolvents. The restrictions 
used, however, must still allow the 
necessary resolvents to be gener- 
ated, or else the technique would 
not be complete. 

One approach to restricting reso- 
lution that is complete is called se- 
mantic resolution. Semantic resolu- 
tion applies two restrictions to reso- 
lution: one using an interpretation; 
the other, an ordering. Recall that 
an interpretation is the assignment 
of a truth value to each variable. In 
the following set of clauses, for ex- 
ample: 


1pvq 
2pv—~q 
3—~pvq 
A DN ee 


p can be assigned true and q false. 
With this particular interpretation, 
clauses 1, 2, and 4 all evaluate to 
true, and clause 3 evaluates to false. 
For a given interpretation, a clause 
that evaluates to true is called a 
nucleus (denoted by a +), and a 
clause that evaluates to false is 
called an electron (denoted by a — 
An ordering is simply a listing, in 
descending priority, of the variables 
in a set of clauses. A single interpre- 
tation and a single ordering should 
be used for the entire proof. The 
particular interpretation and order- 
ing used is not critical, however— 
any will work. 

The two restrictions of semantic 
resolution are: 


1. Never resolve a nucleus with a 
nucleus. 

2. Resolve an electron with a nu- 
cleus only if the variable to be elimi- 
nated has the highest priority 
among the variables that appear in 
the electron. 











An example should make these 
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two rules clear. For an interpreta- 
tion, assign true to p and q and take 
<p, g> as the ordering. Now con- 
sider the following clauses: 


1lpvgq +) 
2pv—q (+) 
3—pvgq CA) 
Arp rg os) 


The possible resolvents are (1,2), 
(1,3), (2,4), and (3,4). By restriction 1, 
(1,2) and (1,3) should not be gener- 
ated because both are nuclei. By 
restriction 2, (3,4) should not be gen- 
erated because the variable p ap- 
pears in the electron and has higher 
priority than g, the variable elimi- 
nated. Thus, the only allowable re- 





solvent is (2,4): 


5 ==q (2,4), (-) 

With clause 5 added to the list, the 
only possibilities now are (1,5) and 
(3,5): 


6p att 


Now the possibilities are (4,6), (1,7), 
(2,7), and (6,7): 


8 —q (4,6), (-) 
9q (7); (+9 
10 —q (2,7), (-) 
11[] (6,7) 


Two additional points should be 


p 


. Failure 
Node 





Figure 2: Binary tree after resolution 
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10 important Reasons 


C Programmers Use 
ur File Manager 





1. It’s written in C. 


Clearly the growing language of 
choice for applications that are fast, 
portable and efficient. All of 
db__VISTA’s source code is written in C. 


2. It's fast — almost 3 times faster 
than a leading competitor. 

Fast access that comes from the 

unique combination of the B-tree 
indexing method and the “network” or 
direct “set” relationships between 
records. A winning combination for 
fast performance. 


3. It’s flexible. 

Because of db__VISTA’s combination 
of access methods, you can program 
to your application needs with ultimate 
design flexibility. Use db__VISTA as an 
ISAM file manager or to design 
database applications. You decide 
how to optimize run-time 
performance. No other tool gives you 
this flexibility without sacrificing 
performance. 

db__VISTA is also well behaved to 
work with most any other C libraries! 


4. It’s portable. 


db__VISTA operates on most popular 
computers and operating systems like 
UNIX, MS-DOS and VMS. You can 
write applications for micros, minis, or 
even mainframes. 


9. Complete Source Code 
available. 

We make our entire C Source Code 
available so you can optimize 
performance or port to new 
environments yourself. 


6. It uses space efficiently. 
db__VISTA lets you precisely define 
relationships to minimize redundant 
data. It isnon-RAM resident: only 
those functions necessary for opera- 
tion become part of the run-time 
program. 


7. Royalty free run-time. 

Whether you’re developing applications 
for yourself or for thousands, you pay 
for db__VISTA or db_ QUERY only 
once. If you currently pay royalties to 
someone else for your hard work, isn’t 


it time you switched to royalty-free 
db_ VISTA? 











8. SQL-based db_QUERY 
Add our new C-linkable, SQL-based, 
ad hoc query and report-writing 
companion product to provide a 
simple relational view of your 
db__VISTA applications. Without 
compromising speed. 


9. Free tech support. 

60 days of free technical and application 
development support for every Raima 
product. Of course, extended support 
and training classes are also available 
at your place or ours. 


10. Upward database 
compatibility 

Start out with file managementina 
single-user PC environment—then 
move up to a multi-user LAN ora VAX 
database application with millions of 
records. You'll still be using db__VISTA. 
That’s why so many C programmers 
are choosing db_ VISTA. 


But don't just take our word 
for it. 


“db_ VISTA has proved to be an all-round high 
performer in terms of fast execution, flexibility and 
portability, and has undoubtedly saved us much 
time and development effort.” 
John Adelus, Hewlett-Packard 
Office Productivity Division 


30-day Money Back Guarantee! 
Try db__VISTA in your environment 
for 30 days and prove it to yourself. If 
not completely satisfied, return it fora 
full refund. 


Call The Programmer’s Shop 
Toll Free Today For Our Special Offer 


1(800) 421-8006 
[In MA 1 (800) 442-8070] 


THE PROGRAMMER’S SHOP 


Your complete source for software, services and answers 


5 Pond Park Rd. 
Hingham, MA 02043 
(617) 740-2510 
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made about semantic resolution. 
First, if an interpretation makes the 
clauses all true or all false, then the 
original argument is not valid and, 
therefore, cannot be proved. Second, 
an electron can never be resolved 
with an electron because resolution 
requires a pair of clauses with com- 
plementary expressions, one of 
which must be true regardless of 
the interpretation used. Thus, one 
of the clauses is always a nucleus. 


Semantic Clashes 

Consider the following proof using 
semantic resolution with true as- 
signed to p, g, and r as the interpre- 
tation and with <p, gq, r> as the 
ordering. All the resolvents that can 
be generated under semantic resolu- 
tion are listed. 


1pv—-qvr (+) 
2q (+) 
3—pv—q (—) 
4—r (—) 
5 -gVr (1,3) (+) 
6pv—q (1,4) (+) 
7 el (4,5) (-) 
8 —q (3,6) (—) 
9[] (2,7) 


The true literals, p and r, in the 
nucleus on line 1 can be eliminated, 
respectively, by the electron on line 
3 and the electron on line 4. Clauses 
1, 3, and 4 constitute a semantic 
clash—that is, a single nucleus to- 
gether with a set of electrons that 
eliminate all its true literals under 
semantic resolution. A semantic 
clash contains exactly one electron 
for each true literal in its nucleus. 

The nucleus and electrons in a 
semantic clash can be resolved in 
the following manner. First, resolve 
the nucleus with any electron in the 
semantic clash. Then resolve the re- 
sulting resolvent with another elec- 
tron. Continue resolving electrons 
with successive resolvents until all 
the electrons are used. For example, 
for the semantic clash (1,3,4) above, 
you get: 


EPeV--7aVvr 
2q 
Sv Ft} 
4—r 


a 
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5 avr (1,3) (+) 
intermediate resolvent 
6 —q (4,5) (-) 


final resolvent 


The final resolvent of a semantic 
clash is always an electron or the 
empty clause—never a nucleus. 

The importance of resolving se- 
mantic clashes is that the intermedi- 
ate resolvents are never needed to 
produce the empty clause and there- 
fore can be omitted. Fewer unneces- 
sary resolvents are generated, result- 
ing in a more efficient proof. The 
previous proof with nine lines, re- 
done with semantic clashes, be- 
comes a proof with only six lines: 


1pv—qvr(t) 

2q (+t) 

3 —pv—qg [-) 

4 —r (-) 

5 —q (1,3,4) (-) semantic clash 
6 [] (2,5) semantic clash 


A semantic clash does not neces- 
sarily exist for every nucleus. For 
example, a semantic clash does not 
exist for clause 2 above until clause 
5 is generated. However, because reso- 

















Here is what you get for $295: 
¢ The full AT&T v1.2 C++ translator. 


by Bjarne Stroustrup, designer of C++. 
¢ Sample programs written in C++. 
¢ Improved installation guide and 
documentation. 
¢ 30-day money-back guarantee. 


FULL AT&T C++: ANNOUNCING VERSION 1.2 
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lution restricted to semantic clashes 
is complete (for a proof, see Chang 
and Lee), there should always be at 
least one semantic clash until the 
empty clause is generated. 
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Listing One (Text begins on page 18.) 


Listing One. A simple adventure game written in AAL 


(loc the-first-room 


"You are in a small, gloomy room lit by an unseen source above you. 
The walls and floor are smooth, hard and dark, like obsidian. Exits 
lead west and south." 
(contains whistle) 
(exits 
(w the-second-room) 
(s "You have wandered around and wound up back where you started") )) 


(loc the-second-room 
"You are in a vast chamber of ice and rock. Fiery torches in the walls 


provide an eerie light. There is a passageway south and another exit to 
the north." 


(contains monster) 

(exits 

(s "The passageway is blocked by rubble.") 

(n (((alive monster) -> "The monster won’t let you pass.") 
the-first-room) ))) 


(command blow 
(blow *obj) 
(requires ((carrying player *obj) "You don’t have a" *obj)) 
"You can’t blow that!") 


(command (throw hurl chuck) 
(throw *instr at *ob}) 
(requires (carrying player *instr) 
(here *ob}j)) 
"Nothing happens.") ) 


(obj monster fixed 
(action throw *obj 
("The monster destroys the a" *instr) 
(destroy *instr))) 


(obj whistle 
(action blow *obj 
“The whistle emits a piercing screech." 
((here monster) -> 


"The monster’s eyes bug out--wider--wider--and then, 
finally, close forever." 
(dead monster) ))) 


End Listing One 
e e 
Listing Two 
Listing 2 for Amsterdam's DDJ article: The deducer 


(defun assert (list) 
(let (({new-stmt (list->rule list))) 


(if (and (add-to-database new-stmt) (eq (rule-type new-stmt) :fact)) 
(run-forward-rules *assertion-rules* new-stmt) ) ) 
new-stmt) 


(defun retract (list) 
(let ((new-stmt (list->rule list))) 
(when (remove-from-database new-stmt) 


(run-forward-rules *retraction-rules* new-stmt) } 
new-stmt) ) 


(defun run-forward-rules (rules fact) 


>; Run a rule if its antecedent matches the fact. (Forward rules can 
;; Only have one antecedent. ) 
(dolist (frule rules) 
(let ((bindings (unify fact (car (rule-antecedents frule)) *globals*))) 
(if (not (eq bindings :fail)) 
(execute-action (rule-consequents frule) bindings) )))) 


(defun deduce (pattern-list bindings) 


;; Returns a stream of bindings (variable lists) for things that match all 


;; the patterns, or the empty stream if there are none. 
(if (null pattern-list) 


(stream-cons bindings *empty-stream*) 
(let ((bindings-stream (deduce-pattern (car pattern-list) bindings) ) ) 
(stream-mapcan #'(lambda (b) (deduce (cdr pattern-list) b)) 
bindings-stream) ) ) ) 


(defun deduce-pattern (pattern bindings) 
(deduce-pat pattern bindings (find-possible-unifiers pattern) ) ) 


(defun deduce-pat (pattern bindings possibilities) 
(if (null possibilities) 
*empty-stream* 
(let* ((rule-pats (rename-rule (car possibilities) )) 
(bindings1 (unify pattern (car rule-pats) bindings) ) ) 
(if (eq bindings1 :fail) 
(deduce-pat pattern bindings (cdr possibilities) ) 


(continued on page 60) 
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One user stated ‘‘BRIEF is one of 
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Listing Two (Listing continued, text begins on page 18.) 


(stream-append 
(deduce (cdr rule-pats) bindings1) 
(deduce-pat pattern bindings (cdr possibilities)))))) 


(defun unify (pati pat2 bindings) 
;;Returns :FAIL if it can't unify, a list of bindings if it can. 


(cond 
((and (null pati) (null pat2)) 
bindings) 
((or (null pati) (null pat2)) 
: fail) 


((let* ((e11 (car pati) ) 

(el2 (car pat2) ) 

(new-bindings (if (var? el1) 
(unify-var ell el2 bindings) 
(unify-const eli el2 bindings) ))) 

(if (eq new-bindings :fail) 
:fail 
(unify (cdr pat1) (cdr pat2) new-bindings)))))) 


(defun unify-var (v el bindings) 
(let ((val (var-value v bindings) ) ) 
(if (eq val :unbound) 
(cons (cons v el) bindings) 
(unify-const val el bindings) ) )) 


(defun unify-const (const el bindings) 
(if (var? el) 
(unify-var el const bindings) 
(if (eql const el) bindings :fail))) 


(defun find-possible-unifiers (pattern) 
;; Returns a list of rules and facts that might unify with pattern 
(if (var? (car pattern) ) 
*db* 
(append (get ‘'* 'database) 
(get (car pattern) 'database) )) ) 


(defun add-to-database (rule) 
;; Returns NIL iff not added (because already present) 
(let ((index (index-of rule) ) ) 
(cond 
((member rule (get index 'database) :test #'equalp) 
nil) 
Ct 
(push rule (get index 'database) ) 
(push rule *db*) 
t)))) 


(defun remove-from-database (rule) 
;; Returns NIL iff not removed (because not present) 


(let* ((index (index-of rule) } 
(the-rule (car (member rule (get index 'database) :test #'equalp)))) 
(cond 
(the-rule 
(setf (get index 'database) (delete the-rule (get index 'database) 


:test #'eq) ) 
(setq *db* (delete the-rule *db* :test #'eq) ) 
t) 
(t nil)))) 


(defun index-of (rule) 
(caar (rule-consequents rule) ) ) 


(defun var? (thing) 
(and (symbolp thing) (char= (char (symbol-name thing) 0) #\*))) 


(defun var-value (var bindings) 
; Follows the chain of variables bindings to find the ultimate value of var. 
(let ((val-pair (assoc var bindings) ) ) 
(if (not val-pair) 
:unbound 
(let ((val (cdr val-pair) )) 
(if (var? val) 
(var-value val bindings) 
val))))) 


(defun rename-rule (rule) 
;; Returns a list (c . 
;; Variables renamed. 
(multiple-value-bind (ants bindings) 

(copy-pattern-list (rule-antecedents rule) nil) 
(multiple-value-bind (conseqs ignorable-bindings) 
(copy-pattern-list (rule-consequents rule) bindings) 
(cons (car conseqgs) ants)))) 


a) of consequent and antecedents, with all 


(defun copy-pattern-list (pat-list bindings) 
(if (null pat-list) 
(values nil bindings) 
(multiple-value-bind (new-pat binds) 
(copy-pattern (car pat-list) bindings) 
(multiple-value-bind (rest-pat final-binds) 
(copy-pattern-list (cdr pat-list) binds) 
(values (cons new-pat rest-pat) final-binds))))) 


(defun copy-pattern (pat bindings) 
(do* ((els pat (cdr els)) 


(continued on page 62) 
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Listing Two (Listing continued, text begins on page 18.) 


(el (car els) (car els) ) 
(new-pat nil) ) 
((nmull els) (values (nreverse new-pat) bindings) ) 
(if (not (var? el))}) 
(push el new-pat) 
(let ((existing-var-pair (assoc el bindings) ) ) 
(if existing-var-pair 
(push (cdr existing-var-pair) new-pat) 
{let ((new-var (rename-var el))) 
(push new-var new-pat) 
(push (cons el new-var) bindings))))))) 


(defun rename-var (var) 
;; Generate a new symbol. 
(gentemp (symbol-name var) ) ) 


se J 
Listing Three 
Listing Three. Code for streams 
(defvar *empty-stream* nil) 


(defmacro delay (thing) 
‘#’ (lambda () ,thing)) 


(defun force (thing) 
(funcall thing) ) 


(defmacro stream-cons (thing stream) 
‘(cons ,thing (delay ,stream))) 


(defun stream-empty? (stream) 
(eq stream *empty-stream*) ) 


(defun stream-car (stream) 
(car stream) ) 


(defun stream-cdr (stream) 
(force (cdr stream) )) 


(defmacro dostream ((var stream) &body body) 
(let ((tempvar (gensym) )) 


‘(do* (({,tempvar ,stream (stream-cdr , tempvar) ) 


(,var (stream-car ,tempvar) (stream-car ,tempvar) )) 
((stream-empty? ,tempvar) *empty-stream*) 
,@body) )) 


(defmacro stream-append (streaml stream2) 
‘(stream-append-func ,streaml (delay ,stream2))) 


(defun stream-append-func (stream delayed-stream) 
(1f (stream-empty? stream) 
(force delayed-stream) 
(stream-cons (stream-car stream) 


(stream-append-func (stream-cdr stream) delayed-stream) ))) 


(defun stream-mapcar (function stream) 
(if (stream-empty? stream) 
*empty-stream* 
(stream-cons (funcall function (stream-car stream) ) 
(stream-mapcar function (stream-cdr stream))))) 


(defun stream-mapcan (function stream) 
(if (stream-empty? stream) 
*empty-stream* 
(stream-append (funcall function (stream-car stream) ) 
(stream-mapcan function (stream-cdr stream))))) 


(defun stream->list (stream) 
(if (stream-empty? stream) 
nil 
(cons (stream-car stream) 
(stream->list (stream-cdr stream))))) 


(defun list->stream (list) 
(if (null list) 
*empty-stream* 
(stream-cons (car list) 


(list->stream (cdr list))))) End Listing Three 


Listing Four 


Listing Four. Code for the every action 


(defun do-every-action (rule bindings) 
7; Get a list of bindings for the single quantified variable, 
7; antecedents; then execute the consequents for each binding. 
(let* ((quant-vars (rule-quant-vars rule) )) 
(if (not (= (length quant-vars) 1)) 
(error "Only one quantified variable allowed in rule a" 


using the 


rule) 
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End Listing Two 





(let* ((bindings-stream (deduce (rule-antecedents rule) bindings) ) 
(bindings-list (stream->list bindings-stream) ) 
(filtered-list (mapcar #’ (lambda (b) (extract-bindings b 

quant-vars) ) 


bindings-list) ) 
(undup-list (delete-duplicate-bindings filtered-list) ) 
(new-bindings-list (mapcar #’ (lambda (b) (append b bindings) ) 
undup-list) )) 
(dolist (new-bindings new-bindings-list) 
(do-rule-actions (rule-consequents rule) new-bindings)))))) 


End Listing Four 


a es es 
Listing Five 
Listing Five. The check-reqs function 
(defun check-reqs (reqs bindings) 
(if (null reqs) 
t 


(let* ((req (car reqs) ) 
(binding-stream (deduce-pattern (requirement-pattern req) 
bindings) ) 
(fstring nil)) 
(cond 
((stream-empty? binding-stream) 
(return-from check-reqs (if (requirement-succeeded? req) 
nil 
(requirement-failure-string req)))) 
(t 
(setf (requirement-succeeded? req) t) 
(dostream (binds binding-stream) 
(let ((result (check-reqs (cdr reqs) binds))) 


(if (eq result t) 


(return-from check-reqs t) 


(if result 


(setq fstring result))))) 


fstring))))) 
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Based on a proven 386 
motherboard, CAE/SAR 386 
systems Come in dozens of 
different configurations for 
memory, disks, floating 
point and graphics. You 
can select high speed 
drives (16 ms), 7OMb, 
140Mb, or 300Mb; EGA or 
mono monitors and cards; 
and 2.5Mb, 4.5Mb, or 8.5Mb 
32-bit RAM— plus other 
options! 

The CAE/SAR 386 systems 
run Unix and DOS concur- 
rently, and also run OS/2 
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‘The winner, though, was the 
CAE/SAR 386. Its ESDI hard 
disk interface made it the 
fastest of all the machines in 


the disk access test." 


PC Magazine 
Dec. 22, 1987 





and Xenix. Floating point 
options are available for the 
Intel 387 chip. 


Basic Unix/Xenix 
systems start at $3,495. 


Get a system that fits you 
perfectly. Call CAE/SAR 
Systems today for more 
information. 


CAE/SAR Systems, Inc. 
P.O. Box 50243 


Palo Alto, CA 94303 
(415) 949-3816 


The Fast Cure 





For A Slowing Listing One (Text begins on page 50.) 
Hard Disk 


ae 
bo 


A Theorem Prover for Propositional Logic 


This program uses the resolution principle restricted to 
semantic clashes to prove theorems in propositional logic. 
The premises and the negation of the conclusion must be entered 
using 1, 0, and -1 to represent, respectively, the presence of a 
variable in true form, the absence of a variable, and the 
presence of a variable in negated form. For example, a run 
in which the following four clauses are used 
Disk Organizer 
Pv *q yr 
q 
“pow *g 
=e 


would look as follows: 


“Vopt is something of a 


enter number of clauses and variables 





miracle. It performs its disk 43 
reorganization chores in ert aah 
seconds, instead of the etter 
minutes and even hours some ae 


other utilities can take. 
..a bargain, Vopt is fast, safe, 


The program would then respond with 


initial clauses 


effective, and even fun to use. L=2. 4 (1) 
What more could you want?” eh s 
Glenn Hart, PC Magazine siputocuett ta 

thd May 12, 1987, Page 36. 1 eek sameness 


proof complete--empty clause generated 


For each nucleus, the program searches for a set of electrons 
that make up a semantic clash. When it finds a semantic clash, it 
generates the resolvent and then uses a recursive technique called 
backtracking to find other sets of electrons that also make up 
a semantic clash. This implementation is compact but quite 
slow. 


“The overall efficiency of my 
computer system was signifl- 
cantly improved.” 


William G. Harrington, 
The National Law Journal 
June 29, 1987, Page 14. 


Author: A. J. Dos Reis 
Dept. of Mathematics and Computer Science 
College at New Paltz 
New Paltz, N.Y. 12561 


+ OR ee Se ae OR a i ae 8b ee 0 ah. Re Re eh a a he SR 


* 





: ; * CONSTANTS 
Vopt gives you faster hard disk */ 
access in seconds! ee 
#define FALSE 0 
: : #define MAXCLAUSES 100 
When DOS creates a file, it sisting: MAVARE. 1b 
scatters file fragments over the ser: Sees 
; ; efine EUS 
disk surfaces. It takes time to paligp pissed as a de igs ea OEE ee ie et ee eee dae 
collect those fragments when you Prine ees tras 
need the data, so your system int clause [MAXCLAUSES] [MAXVARS]; /* Holds clauses x / 
int clausetype [MAXCLAUSES] ; /* Holds type: nuc or elec «f/f 
a slower and slower as your int clashelec[MAXVARS]; /* Holds row numbers of electrons 
files grow more fragmented. that form a semantic clash */ 
int nvars; /* Number of variables a 
Vopt organizes your files the way int avail; /* Index of next avail row wf 
DOS should have written them-- int newclauses; /* TRUE - se Se eo : 
generated on last pass i 
contiguously--so file retrieval is int noemptyclause; { ee SeTRS Aur 
easy and fast! Ra ia ge a a leg eh meet lar 
a main prompts for and inputs the clauses. It then calls 
* findsemclash for each nucleus. It continues until the 
$49 95 $3 shipping/handling. - empty clause is generated or until no new resolvents are 
: CA add 6% sales tax. fs generated. 
in () 
GOLDEN BOW SYSTEMS Peay 
int nclauses; /* Number of clauses af 
2870 Fifth Avenue int nuc; /* Index of nucleus */ 
Suite 201 int “Asdz /* Utility indices x/ 


printf("enter number of clauses and variables\n"); 

scanf ("$d%d", &énclauses, énvars); 

printf("enter clauses\n"); 

for (i=0; i<nclauses; i++) /* Read in clauses ay. 


San Diego, CA 92103 
800/284-3269 


Vopt operates with DOS systems, including 
PS/2, with 512Kb RAM. 
Vopt is a trademark of Golden Bow Systems. 
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Ce, 


Listin 


{ 


} 





g One (Listing continued, text begins on page 50.) 


clausetype[i]=ELECTRON; 
for (j=0; j<nvars; j++) 
{scanf("%d", &clause[i] [j]); 
if (clause[i] [j]==1) 
clausetype[i]=NUCLEUS; /* Set clausetype accordingly */ 
} 


avail=nclauses; /* Keep track of next avail row*/ 
printf("initial clauses\n"); /* Print out initial clauses */ 
for (i=0; i<nclauses; i++) 


{ 


for (j=0; j<nvars; j++) 
printf ("%3d",clause[i] [4]); 
printf(" ($24).in", i+1)? 


printf ("resolvents\n") ; 


noemptyclause=TRUE; /* Initialize flag x / 
do 
{newclauses=FALSE; /* Initialize flag xf 
nuc=0; /* Start search from row 0 */ 
do 
{if (clausetype[nuc]==NUCLEUS) /* Search for nucleus *x/ 
{for (i=0; i<nvars; i++) /* Initialize clashelec x/ 
clashelec[i]=-99; 
findsemclash(0,nuc); /* Look for all sem clashes xf 
} 
nuct++; /* Repeat for next clause xf 


} 
ae, 


} while ((nuc<nclauses) && noemptyclause) ; 
while (newclauses && noemptyclause) ; 
noemptyclause) /* Failed to gen empty clause? */ 


printf("argument not valid\n"); 


else 


rintf("proof complete--empty clause generated\n"); 
Pp p 


[ 8 enn ra 
* findsemclash searches for an electron which under semantic 
* resolution will eliminate the true literal in column truecol 
* of the nucleus in row nuc. When it finds a satisfactory 
* electron, it recursively calls itself to find a electron that 
* eliminates the next true literal. When a set of electrons 
* that forms a semantic clash is found, findsemclash generates 
* the resolvent instead of making a recursive call. Then 
* it backtracks to find other sets that also form semantic clashes. 
x / 

findsemclash (truecol,nuc) 

{int col; /* Column index x / 
int elec; /* Row number of electron x/ 
int goodelec; /* True if elec ok under 

semantic resolution «/ 
int 1,45 /* Utility indices */ 
while (truecol<nvars) /* Checked all columns of nuc? */ 
if (clause[nuc] [truecol]==1) /* Is this a true literal x / 
{elec=0; /* Search for appropriate elec */ 
do 
{if (clausetype [elec] ==ELECTRON) 
{col=0; /* check col-by-col if elec ok */ 
goodelec=TRUE; 
while ((col<nvars) && goodelec) 
i-T /* Satisfies sem resolution? */ 
( (col<truecol) && (clause[elec] [col] !=0)) 
| | 
( (clause[nuc] [col] * clause[elec] [col]==-1) 
l= 
(truecol==col) ) 
) 
goodelec=FALSE; /* Electron fails test x} 
colt++; /* Test next column x/ 
} 
if (goodelec) /* Electron passed test? a f 
{clashelec[truecol]=elec; /* Remember row number x/ 
findsemclash(truecol+1,nuc); /* Recursive call x/ 
} 
} 
elect+; /* Try next electron x / 
} while ((elec<avail) && noemptyclause) ; 
return; /* Backtrack x / 
} 
else 
truecol++; /* Continue search for true lit 
in the nucleus a7 
newclauses=TRUE; /* Get here only when a sem 
clash is found */ 
for (i=0; i<nvars; i++) /* Copy nuc to new avail row af 
clause [avail] [i]=clause[nuc] [i]; 
for (i=0; i<nvars; i++) 
{elec=clashelec[i]; /* Get row number of electron */ 


(continued on next page) 
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How many 
@ programmers does 
it take to maintain a 
MAKE dependency file? 





NONE! /f you 
@ use VersiMAKE™ 





VersiMAKE™ is a full-featured 
MAKE utility that includes: 


M@ Dependency Generation 
Derives your system’s dependencies, 
through analysis of its C and MASM 
source files. Say goodbye to manual 
maintenance of MAKE dependency files! 
@ Wild Card File Name Matching 
Analyzes an entire collection of source 
files with a single statement. 

@ Nested Include File 

Handles standard C and MASM “‘include”’ 
conventions, and the INCLUDE environ- 
ment variable. 

@ Powerful Macro Facilities 
Built-in macros, user-defined macros, 
and environment variables. 


@ Analytical Reports 

Shows the entire Include file hierarchy 
for each source file analyzed, and all of 
the parent source files for each Include file. 


How many 
@ programmers does 
it take to trace a 
symbol thru your system? 





ONE! /f you 
@ use VersiCREF™ 





VersiCREF™ is a unique utility 
that creates a Master Cross- 
Reference of your entire system. 


@ Multi-Lingual 
Handles C, assembler, or both. 


@ Flexible 

File names with line numbers, or file 
names alone. Global and local symbols, 
or globals alone. 


@ Powerful 


Easily handles systems containing 100 
source files or more. 


VersiMAKE™ $125 
VersiCREF™ $75 
Both $150 
(Outside U.S., add $5 for shipping 
and handling) 


oe -334- 
“Uf we 26 -— ° 


MC/VISA/AMEX accepted 
SUMMIT INFORMATION 
SYSTEMS, INC. 
73 East Lane, Willingboro, NJ 08046 
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SEMANTIC RESOLUTIONS 


Listing One (Listing continued, text begins on page 50.) 





if (elec!=-99) /* -99 means electron not needed 
for the ith col x / 
for (j=0; j<nvars; j++) /* Generate the resolvent wy 


{clause [avail] [j]+=clause[elec] [4]; 
if (clause[avail] [j]!=0) 
noemptyclause=TRUE; 
if (clause [avail] [j]==-2) 
clause [avail] [j]=-1; 
} 
} 

noemptyclause=FALSE; /* Initialize flag «/ 
for (j=0; j<nvars; j++) /* Check for empty clause =/ 


{printf ("%3d",clause[avail] [j]); 
if (clause[avail] [j]) 


noemptyclause=TRUE; /* Reset if no empty clause */ 
} 
printf (" ($ld from %1d",availt+1l,nuct1); /* Print resolvent x/ 
for (i=0;i<nvars; i++) 
if (clashelec[i] !=-99) /* Print electron row numbers */ 


printf(", %1d",clashelec[i]+1); 
printf(")\n"); 
clausetype [avail] =ELECTRON; /* Set type of resolvent x f 
avail++; /* Increment avail row index */ 


} 


End Listing 














You Have A CHolce 


flee In Soffware Protection 
The Secom Key 


The Secom Key provides effective 
software protection while insuring 
customer satisfaction. It eliminates the 
problems normally associated with 
copy protection. The Secom Key is 
designed for software packages 
which are reproduced identically. 
Available in quantities, for as low 
as $21.95. 


Both the Secom Key 

AND The Memory Key: 

LJ are completely transparent 
to end user 

LJ will not interfere with 
peripheral operations 

(_} don’t occupy disk drives 

(J allow unlimited backup copies 

Lj are easily installed 

Lj are very small in size 





CHOICE #2 | 


The Memory Key 


The Memory Key offers special 
flexibility. It comes with unique software 
which permits the use of its available 
read/write memory. Each byte of 
memory can be addressed individually 
or in groups for specific identification. 
Also, numerical information can be 
transferred between the Memory Key 
and your software and acted upon. The 
Memory Key comes with special error 
checking abilities providing 100% 
reliability. EXample applications are: 
(_.J modular package control 

[J serialization 

J software customization 

(_} demo control 


(J auditable and easy 
software leasing 


(Jj any “counter” operation 





lc el ett 


a a ell tie 


pee See 


Secom offers alternatives! 


If you would like a demonstration 
& secom General Corporation package or additional information, for previously unavailable controls and 


The ease of use, cost effectiveness and 
functionality of the Memory Key allows 


1829 E. Franklin Street #500 : ; ; : 
applications. 
Chapel Hill, North Carolina 27514 please write or call: PP 


(919) 942-8500 4-800-843-0413 


CIRCLE NO. 150 ON READER SERVICE CARD 


—— FF > 


66 Dr. Dobb's Journal, April 1988 


How Soft-ICE works 


Soft-ICE unleashes the power of the 80386 to surround your program in a 
virtual machine. This gives you complete control of the DOS environment. 
Soft-ICE uses 80386 protected mode features, such as paging, I/O privilege 
level, and break point registers, to add real-time hardware-level breakpoints to 
your existing DOS debugger. To use Soft-ICE you simply pop the Soft-ICE 
window up through a key sequence, set your hard break points, then return to 
your soft debugger. As the target program is executing, Soft-ICE recognizes 
when the Bieaioaint conditions have been reached and gives control back to 
your soft debugger. And this is all done at full 80386 speed! Soft-ICE can 
also be used in stand-alone mode. This comes in handy if you are debugging 
loadable device drivers, interrupt handlers, or terminate and stay resident 
programs. All of the standard debugging features are available to help you 
find the most difficult systems problems. 





"Since Soft-ICE doesn’t take up any of my memory I have it in my AUTOEXEC.BAT to load every day... It has saved 
me at least one month’s time on my latest device driver program." Peter Ricker, President of Maverick Software 





IT'S THE 








The random number 
generator that grinds 
out code faster than 
chips through a goose. 
Its output looks, reads, 
and runs like the real 
thing — only your 
hardware will know for 
sure. It slices, it dices 
— of course! But it's 
also great for State-run 
Lotto games. 
Void Where Prohibited. 


Code-O-Matic 
Just $144.95 


Makes a great X-MAS 
gift! Buy Two! NOW! 
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Listing One (Text begins on page 98.) 





1| #include <stdarg.h> /* ANSI variable-argument defines */ 
2| #include <dos.h> /* uSoft: defines for FP_OFF and FP_SEG af 
3| 
4| /* IDOPRNT - integer-only printf/fprintf/sprintf workhorse 
5|.- * function. 
6] * 
A lenges (C) 1988 Allen I. Holub. All rights reserved. 
She me 
9| * The following conversions are supported: 
Gl, ae 
11 * $d tld decimal, long decimal 
LZI:® $u unsigned (int only, no longs) 
i3} $s string 
14|s-* $x $1x hex, long hex 
La oe $o lo octal, long octal 
6s. * $b %$lb binary, long binary (nonstandard) 
291.5% $p far pointer (in hex XXXX:XXXX) 
2S [tee 
Loi" * Note that it’s impossible to get zero fill in the offset 
20| * part of a %p conversion. That is 1234:0001 is always 
a printed as 1234:1. Sorry. The following modifiers are 
Zot". * supported for all conversions: 
2357 
24| ..* $Ox zero left fill 
25% $-x left justification in field 
26 [-- 5 $|x centered in field (nonstandard) 
oat * $*x field width from first argument 
23|>.* 
2s| °* Precision is supported in strings: 
SOPs = 
si}: * $X.Ys X-character wide field, print at most Y characters 
325: '* (even if the string is longer). If X or Y is a *, 
33|> * the width is taken from the next argument. 
34|. ..* 
35|>-* Potential portability problems: 
364) 1 
Sh. * tp is a FAR pointer. I’ve used the "far" keyword to 
38| * declare it as such and I’ve used the FP_SEG and FP_OFF 
39| > to extract the segment and offset parts of the pointer. 
40—* The offset part of a near pointes can be printed by 
ai; * casting it to an int and using %x. 
A24 87 
43| 
44| extern char *ltos(long, char*, int); 
45| 
AG | [®§an nn nn ann rrr n= 
47| * Macros to save some code space below. If your compiler 
48| * doesn’t accept multi-line macros, remove the backslashes 
49| * and merge the entire definition onto one line. 
50! * These both have horrible side effects. Be careful. 
SM iy 
52| * PAD(fw, filchar, out, op) outputs filchar, fw times. fw = 0. 
53| * TOINT(p,x) works like "x = atoi(p);" except p 
Sh) > * is advanced past the number. 
SS) #7 
56| 
57| #define PAD(fw, fc, out, op) while( --(fw) >= 0 ) \ 
58 | (*out) ( fc, op ) 
59] 
60| #define TOINT(p,x) while( ’0’ <= *p && *p <= '9" ) \ 
61| x = (x * 10) + (*ptt - ’0°) 
62 | 
63) /*-------------------- $= $$ nnn nnn nnn nnn nnn 
64| * INTMASK is a portable way to mask off the bottom N bits 
65| * of a long, were N is the width of an int. 
66{,° */ 
67 | 
68| #define INTMASK (long) ( (unsigned) (0) ) 
69 | 
TO | [Been nnn nnn nnn nn nnn nnn nnn nnn nnn n= */ 
71| 
72| void idoprnt( out, o_param, format, args ) 
73 | 
74| int (*out) (); /* output subroutine “/ 
75| void *OQ param; /* 2nd argument to pass to out() x / 
76| char * format; /* pointer to format string nf 
77| va_list args; /* pointer to arguments x / 
78| { 
73 | char filchar ; /* Fill character used to pad fields */ 
80| char nbuf [34]; /* Buffer used to hold converted #s */ 
81) char *bp ; /* Pointer to current output buffer */ 
82 | int slen : /* length of string pointe to by bp */ 
83| int base ; /* Current base (%x=16, %d=10, etc.) */ 
84 | int fldwth ; /* Field width as in %10x «/ 
85 | int precision; /* Precision as in %10.10s or %10.3f */ 
86 | int lftjust ; /* 1 = left justifying (ie. %-10d) x/ 
87] int center ; /* 1 = centered (ie. %|10d) xf 
88 | int longf ; /* doing long int (ie. %1x or %X) */ 
89| long lnum ; /* used to hold numeric arguments af 
a void far *pnum; /* Pointer-sized number */ 
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92 | 

93 | 

94 | 

95] 

96| 

97| 

98 | 

99| 
100| 
101] 
102] 
103| 
104| 
105| 
106| 
107 | 
108 | 
109] 
110| 
111| 
112| 
RD 
114| 
LL5| 
116] 
117| 
118| 
119] 
120] 
121] 
122| 
123| 
124| 
125| 
126| 
127| 
128 | 
1291 
130 | 
131 | 
132| 
133} 
134 | 
135] 
136| 
137| 
138 | 
139| 
140| 
141| 
142| 
143 | 
144| 
145| 
146| 
147| 
148 | 
149| 
150| 
151| 
152| 
153] 
154| 
155| 
156| 
157| 
158| 
159| 
160 | 
161] 
162 | 
163 | 
164 | 
165| 
166| 
167 | 
168 | 
169] 
170| 
171 | 
172| 
173 | 
174| 
175| 
176| 
177] 
178] 
179| 
180| 
181] 
182 | 
183 | 
184 | 
185| 
186| 
187 | 


for (; 


{ 


pnum: 


if( *format != '%") 


{ 
} 





*format ; formatt++ ) 


/* No conversion, just */ 
/* print the next char. */ 
(*out) (*format, o param); 


else /* Process a % conversion */ 


{ 


nbuf 


bp 
filchar 
fldwth 
lftjust 
center 
longf 
precision 
slen = 


hou ou ou 
. 
- 


© Se Ye Se Ye Se Fe 


oooo o © 


, 


, 


/* Interpret any modifiers that can precede a 
* conversion character. (ie $04x , %-10.6s... etc). 
* if a * is present instead of a field width then 
* the width is taken from the argument list. 


x/ 
if( *++format == '-’) { ++format ; ++lftjust; } 
if( *format == '|') { ++format ; ++center; } 
if( *format me 0") { ++format ;~ filchar = "0%; } 


if( *format != '*" ) 

TOINT( format, fldwth ); 
else 
{ 

++format; 

flidwth = va_arg(args, int); 
} 


if( *format == '.' ) 
{ 
if( *++format != '*! ) 
TOINT( format, precision ); 
else 
{ 
++format; 
precision = va_arg(args, int); 


if( *format == /1’ || *format == ‘L’ ) 


++format; 
+t+longf ; 


/* By now we’ve picked off all the modifiers and 

* *format is looking at the actual conversion 

* character. Pick the appropriatly sized argument 
* off the stack and advanced the pointer (ap) to 
* point at the next argument. 


switch( *format ) 


{ 


default: *ppt++ = *format ; break; 
case "5": *bpt+ = va_arg(args, int Ve break; 
case 's*: bp = va_arg(args, char *); break; 
case °p’: 
pnum = va_arg(args, void far *); 
bp = ltos( (unsigned long)FP_SEG(pnum), bp, 16); 


Shp =. 2% 2 
bp = ltos( (unsigned long)FP_OFF(pnum), bp, 16 ); 


break; 
case ‘’u’: base = -10 ; goto pnum ; 
case ‘qd’: base = 10 ; goto pnum ; 
case ‘x’: base = 16 ; goto pnum ; 
case ‘b’: base = 2 ; goto pnum ; 
case ’0’: base = 8 


/* Fetch a long or int sized argument off the 
* stack as appropriate. If the fetched number 
* is a base 10 int then mask off the top 
* bits to prevent sign extension. 


if( longf ) 
lnum = va_arg(args, long); 
else 


{ 


lnum = (long) va_arg(args, int); 


if( base == -10 ) /* Unsigned int */ 
{ 

base = 10; 

inum &= INTMASK; 


(continued on next page) 
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EVERYTHING FOR 
THE C PROGRAMMER 


PL US FREE SHIPPING! 

FREE SOFTWARE! 
LATTICE C COMPILER Ver 3.2 $229 
The classic DOS development environment. 


MICROSOFT C COMPILER Ver. 5.0 $285 
Innovative CodeView™ debugger, “make”, more. 


MICROSOFT QUICKCCOMPILERVer.1.0 $69 
Complete with graphics, 5.0 compatible. 


TURBO C COMPILER Ver. 1.5 $69 
Fast, full development environment bargain. 


INSTANT C INTERPRETER Ver. 3.0 $379 
Instant linking, execution and debugging! 
Directly link Microsoft, Lattice libraries. 


C-TERP C INTERPRETER Ver. 3.0 $229 
Virtual memory support, versions for all compilers. 


PC LINT Ver. 2.13 $99 
Shake out C bugs before compiling; neat! 


ESI RESIDENT C Ver. 1.0 (w/source) $149 
Create TSR programs, handle interrupts! 


PANEL PLUS Ver. 1.0 (w/source) $379 
Complete screen |/O development, no royalty. 


WINDOWS FOR C Ver. 4.14 $149 
WINDOWS FOR DATA Ver. 2.06 $229 
Flexible, fast, high quality windowing system. 


ESI SCREENSTAR Ver. 1.0(w/source) $149 
Generates C code for windows, data I/O. 


GREENLEAF LIBRARIES: 
Functions Ver. 3.10 $129 
Communications Ver. 2.10 $129 
Data Windows Ver. 2.10 $159 
Data Windows/With Source $269. 





























Seasoned, reliable library leader of the pack. 
CTREE Ver. 4.1 $299 
RTREE Ver. 1.1 $229 
CTREE/RTREE Package $499 
One of the fastest B—trees, handles networks. 
-BTRIEVE Ver. 4.1 $185 
XTRIEVE Ver. 3.02 $185 
XTRIEVE report option Ver. 3.02 $109 
Innovative performer, fault tolerant B—tree. 
dbVISTA with Source Ver. 2.21 $389 
dbQUERY with Source Ver. 1.0 $389 
Very fast portable B—tree, SQL query option. 
NORTON GUIDE C Ver. 1.0 $69 






NORTON GUIDE C/ASM Twin PackVer.1.0 $110 
Online help and reference when you need it. 


THE BEST QUALITY C PRODUCTS 
AT THE BEST PRICES! 








ORDER TOLL FREE: 
(800) 356-0909 











IN NEW YORK CALL: 
(800) 341-1950, EXT. 889 







FREE! PC-Write V2.71 complete word 

processor or Spectacular Two Player, 

Real-Time SPACEWAR V1.72 with 
every order! 

- FREE! No charge for UPS Ground. 


No surcharge for VISA or Mastercard. 

Checks accepted. Allow 15 days to clear. 

24 hour 1200 Baud order line! (914) 241-9324. 
Customer Support (914) 666-8119. 

No APO, FPO or international orders. 

30 day money back guarantee on unused items 
with intact seals. 

Call for latest prices and availability. 

Returns subject to 20% restocking fee. Call 
first for RMA Number. 


487 East Main Street, Mt. Kisco, NY 10549-0110 
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PROGRAMMERS! 


Has your 
get-up-and-go 
got up and went? 


KAFFIFIX 


THE CAFFEINE INHALER! 


stop leaving the coffee 
rings on your desk and 
printouts! 

The non-prescription 
stimulant of choice among 
programmers is now 
available in a no-muss, 
no-fuss dispenser! 


from DEROVEND, inc. 
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Listing One (Listing continued, text begins on page 98.) 


188 | else if( base != 10 ) /* Nondecimal int */ 

189| { 

190 | lnum &= INTMASK; 

LOL] } 

192 | } 

193 | 

194| if( lnum < OL && base == 10 6&& filchar == ‘0’ ) 

L935:} { 

196| /* Again, print a - to avoid "000-123." 

197 | * Only decimal numbers get - signs. 

198] */ 

199| 

200| (*out)( ’-" ,o param) ; 

201| --fldwth ; 

202 | lnum = -lnum ; 

203| } 

204 | 

205] bp = ltos( lnum, bp, base ); 

206| break; 

207 | } 

208 | 

209] /* Terminate the string if necessary and compute 

210| * the string length (slen). Bp will point at the 

211| * beginning of the output string. 

212 | x/ 

213 | 

214| if (*format != ’s’) 

24555 { 

216| *bp 

217 slen 

218| bp 

219| } 

220| else 

221.| { 

222 | slen = strlen(bp); 

223 | if( precision && slen > precision ) 

224 | slen = precision; 

225 | } 

226 | 

227 | 

228 | /* Adjust fldwth to be the amount of padding we need 

229| * to fill the buffer out to the specified field 

230| * width. Then print leading padding (if we aren’t 

232 | * left justifying), the buffer itself, and any 
* 
* 


"\0'; 
bp - nbuf; 
nbuf; 


232 | required trailing padding (if we are left 
233| justifying. 

234 | &f 

235 

236| if( (fldwth -= slen) < 0 ) 

237 | fldwth = 0; 

238 | 

239 | if( center ) 

240| { 

241) /* Use longf as counter */ 
242 | longf = fldwth/2; 

243 | PAD( longf, filchar, out, o param ); 
244 | } 

245| else if( !lftjust ) 

246 | PAD( fldwth, filchar, out, o param ); 
247 | 

248 | while( --slen >= 0 ) 

249 | (*out) (*bp++,o param); 

250] 

251] if( center ) 

252 | { 

253 | longf = fldwth - fldwth/2; 

254] PAD( longf, filchar, out, o param ); 
255] } 

256| else if( lftjust) 

2571 PAD( fldwth, filchar, out, o param ); 
258 | 

2359)| } 

260 | } 

261| } 

262 | 


264 | 

265| #ifdef DEBUG 

266| 

267| #include <stdio.h> 

268 | 

269| printm( fmt, ... ) 

270| char *fmt; 

ast, 4 

272 | extern int fputc(); 
273 | va_list args; 

274| va_start(args, fmt); 
275 | idoprnt( fputc, stdout, fmt, args ); 
276| } 

277) 


2791 


280| main() 
281| { 
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282 | 


printm("should see <0 123 45 6 7>: "); 


(char far *)( Oxabcd0123L) dz 


283 | printm(" $d tx to $ld %1x tlo tc %s\n", 
284 | Oy dey 2, Shy AD, Sli, % Sy STS Ye 
285 | 
286| printf("should see: hello world: " ); 
287) printm("%$s $s $c", "hello", “world", ‘\n’ UE 
288 | 
289 | printm("should see <string> : <%6.6s>\n", "string NO NO" ); 
290] printm("should see < Btrs.. 2 <6*;*#s>\n", 6, 3,. “string” js 
291 | printm("should see <70000> : <$ld>\n", 70000L de 
292 | printm("should see <fffff> : <1x>\n", Oxf£fffL) ; 
293 | printm("should see <ffff> : <%x>\n", -1 ); 
294| printm("should see <-1> : <%ld>\n", -1L 2 
295| printm("should see <x> : <%c>\n", "x! ie 
296| printm("should see < x > : <${S5e>\n", "x! de 
297 | printm("should see <a5> : <$x>\n", Oxa5 he 
298 | printm("should see <765> : <%o>\n", 0765 ): 
299| printm("should see <1010> : <t%b>\n", Oxa de 
300 | printm("should see < 123> : <%6d>\n", 123 ): 
301] printm("should see < 456> :. <%*d>\n", 6,456 ) 
302| printm("should see < -123> : <%6d>\n", -123 ): 
303] printm("should see <123 > : <%-6d>\n", 123 ): 
304| printm("should see <-123 > : <%$-6d>\n", -123 e 
305] printm("should see <-00123> : <$06d>\n", -123 js 
306] printm("should see <abcd:123>: <%p>\n", 
307 | 
308] } 
309| #endif 
es o 
Listing Two 
11 /* LTos.c Convert long to string in indicated base. 
5 (C) 1988 Allen I. Holub. All rights reserved. 
at. *F 
4| 
§| char *ltos( n, buf, base ) 
6| unsigned long n : 
7| char *buf ; 
8| int base ; 
oT 4 
10| /* Convert long to string. Prints in hex, decimal, octal, 
11] * or binary. 
12 oS is the number to be converted 
13) * "buf" is the output buffer. 
14| * “base” is the base (16, 10, 8 or 2). 
15.1 = 
16| * The output string is null terminated and a pointer to the 
17| * null terminator is returned. 
18| = 
19] * The number is put into an array one digit at a time as 
20) * it’s translated. The array is filled with the digits 
21) * reversed (ie. the \0 goes in first, then the rightmost 
22! x digit, etc.) and then is reversed in place before 
23) * returning. 
24) * 
25) * This routine is much like the unix() ltoa except that 
26| * it returns a pointer to the end of the string. 
27) #f 
28 | 
29| register char *bp = buf; 
30] register int minus = 0; 
31] char *endp; 
32 | 
33 | if( base < 2 || base > 16 ) 
34 | return 0; 
35 | 
36| if( base == 10 && (long)n < 0 ) /* If the number is negative */ 
37] { /* and we're in base 10, set */ 
38| minust+ ; /* minus to true and make it */ 
39] n = -( (long)n ); /* positive. x/ 
40| } 
41| 
42| tbp = '\0" ; /* Have to put the null in now */ 
43| /* because the array is being */ 
44| /* filled in reverse order. x / 
45| do { 
46| *++bp = "0123456789abcdef" [ n % base ]; 
47| n /= base; 
48| 
49| } while( n ); 
50| 
51] if( minus ) 
52| SESE. FoR SF 
53| i in pl */ 
54 | for( endp = bp; bp > buf ;) /* Reverse string in place 
a minus = *bp; /* Use minus for temporary . 
57| *bp -- = *buf; /* storage. 
58| *buf++ = minus; 
59| } 
. i inating null */ 
61] return endp; /* Return pointer to terminating 
62| } 
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End Listing One 


End Listings 








MC/VISA/Checks. 
Demo disk available. 


rm Editor Features 


Full control over foreground & background 
video attributes. 

Access to the extended (graphics) char. set. 
Line and box drawing. 

Define and modify field attributes: 


* FieldName © FieldOrder * Edit Mask 

* Default * Auto Tab * Must Respond 

* Numeric Test = Right Justify * Echo Data 

* Display Only * UpperCase =* Warning Only 

* Test Range __® Data Type * Numeric Precision 
Test form utility. gc 

Generate program shell utility. 

Field reorder utility. 

Temporary exit to DOS. : 
Compile form definitions to .OBJ files. 


n Time Library 


Routines are color (CGA, EGA, VGA) / 
monochrome independent. 

Forms are processed in dynamic memory. 
User written validation routines can be 
linked to fields. 

String, Byte, Integer, Long, Real, and Double 
data types are supported. 

Scrolling fields. 

Run time library source code included. 


Run time library includes (plus others): 

= load_form( ) *put_fielia() =get_form() 
erelease_form() «=put_form() *clear_form_buffer () 
*display_form() get_field() *alter_field_attrib () 


© No royalties. 


ystem Requirements 


e IBM PC/XT/AT/PS2 or compatible. 
e PC-DOS or MS-DOS 2.0 or later 


irdering Information 


=— Prices — 
Turbo Pascal $99.95 


Call for shipping 
dates on other ver- 


sions. 


Microsoft Pascal . $149.95 
MicrosoftC.... . $149.95 
LatticeC...... . $149.95 


Ly eee . $149.95 
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NROFF/PC™ 


The REAL Thing for DOS 


NROFF/PC is a complete 
text formatting system for 


MS-DOS systems. Including: 


NROFF The powerful UNIX 
text formatter 


A tool to assist 
with the layout of 
tabular material in 
Nroff documents 


TBL 


A comprehensive 
Nroff macro pack- 
age for preparing 
books and _ tech- 
nical manuals 


A tool for describ- 
ing mathematical 


equations in Nroff 
documents 


e All tools are a complete port 
from the AT&T Documentor’s 
Workbench 2.0 


elt’s Fast! We've modified 
Nroff especially for DOS for 
lightning speed 


e Supports any Dot Matrix printer 
and many laser printers 


e Specially Priced At $99 


eA complete Troff typesetting 
system is available NOW for 
LaserJet and PostScript printers 
on MS-DOS for $695, XENIX 
and Microport UNIX for $795. 


—a 


NGA St RES 


Elan Computer Group, Inc. 
410 Cambridge Ave., Suite A 
Palo Alto, CA 94306 
(415) 322-2450 


Visa and MasterCard Accepted 


Unix is a tradmark of AT&T 
MS-DOS and Xenix are tradmarks of Microsoft 
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Listing One (Text begins on page 106.) 


Scouting Toolkit™ 
A HyperCard Project 


Programmed and ©1988 by Stan Krute 
All rights reserved 


The Stack 

Description 
The stack's name is “Scouting Toolkit™" 
It contains 1 background 
It contains 1 card 
The size of the stack is 20K 

Script 
The stack has no script 


Background 1 
Description 
The background has no name 
It's used by 1 card 
Script 
The background has no script 


Card 1 
Description 
The card's name is "Scouting Toolkit" 
It contains 17 buttons 
It contains 2 fields 


on openCard 
-- hide the menubar, and initialize a state variable for it 
global menubarState 
hide menubar 
put "hidden" into menubarState 


-- hide some windows 

hide message box 

hide tool window 

hide pattern window 
end openCard 


on mouseUp 
-- redraw the toolkit buttons, in case some are hidden 
repeat with buttonNumber = 2 to 13 
show button buttonNumber 
end repeat 
end mouseUp 


Button 1 
Description 

The button's name is “Delete Scouting Toolkit” 
Its Show name property is false 
Its Auto hilite property is true 
Its style is shadow 
It has an icon, ID# 30010 
Its rectangle is 42 units wide, 42 unitshigh 
The button's located at card location (36,292) 
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Its text properties are: System Font 12, Height 16, Align center 
Script 


on mouseUp 
-- make sure we don't mess up the guppy card 


if short name of this card is not "Scouting Toolkit™ then 





-- save and set the user level 


get userLevel 


put it into entryUserLevel 


set userLevel to 5 


-- show the watch cursor 


set cursor to 4 


-- make sure the kit buttons are showing 
show button "Scouting Toolkit Icon" 


click at loc of button 


-- set the tool 
choose button tool 


"Scouting Toolkit Icon" 


-- get rid of our toolkit 


Courseware Applications, Inc. 


DRAWBRIDGE 


Drawbridge” lets you create high- 
quality graphics displays for your 
applications, but saves you the tedi- 
ous task of programming them. 


That's right... just draw the picture 
on the screen using the mouse or the 
keyboard. At the press of a key 
Drawbridge automatically writes 
the source code calls to your graph- 
ics library to recreate the graphic. 
Copy the code into your applica- 
tion, compile it, and that's it! 


click at loc of button "Home" Drawbridge is an object- 

doMenu “Clear Button" oriented interactive editor 

click at loc of button "Back" that greatly increases your 

doMenu "Clear Button" productivity when creating 
raphics displays. 

click at loc of button "Next" ae Per 

doMenu “Clear Button" 

click at loc of button "Previous" 


doMenu “Clear Button" 


click at loc of button 
doMenu "Clear Button" 


click at loc of button 
doMenu "Clear Button" 


click at loc of button 
doMenu “Clear Button" 


click at loc of button 
doMenu "Clear Button" 


choose field tool 


"Toggle Pattern Window" 


“Toggle Tool Window" 


“Toggle Message Box" 


“Toggle Menubar™ 


show card field "Copyright" 
click at loc of card field "Copyright" 


doMenu "Clear Field" 
choose button tool 


click at loc of button "Scouting Toolkit About" 


doMenu "Clear Button" 


click at loc of button "Scouting Toolkit™" 


doMenu "Clear Button" 


click at loc of button 
doMenu “Clear Button" 


"Scouting Toolkit Window" 


show button "Scouting Toolkit Icon" 
click at loc of butten "Scouting Toolkit Icon" 


doMenu "Clear Button" 


-- snake swallows tail 


click at loc of button "Delete Scouting Toolkit" 


doMenu "Clear Button" 


-—- set the tool 
choose browse tool 


-—- restore the cursor 
set cursor to 0 





Create high-quality graph- 
ics using features such as 
lines, ovals, arcs, polygons, 
fill patterns, color, and text 
fonts. 


* Now for MetaWINDOW, 
Turbo C, and Microsoft C 
V5.0 graphics libraries 

¢ Cor Pascal source code 

¢ 30-day money back guar- 
antee 


To order, or for more information, 
call: 


(217) 359-1878 


COURSEWARE APPLICATIONS, INC. 
475 Devonshire Drive 
Champaign, IL 61820 


"Its a real timesaver!" 


Versions are available now to generate Pascal or C language 
function calls for the MetaWINDOW” graphics library 
($129) and C calls for the Turbo” C and Microsoft” C V5.0 
graphics libraries ($49). Specify language and library when 
ordering. A small restocking fee applies to returns. 


ae” * _— ee geese “ery ee ~ ee 





(continued on next page) 
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Introducing 


‘Disk Cache for the IBM PC”’ 


Make your floppy drive and 
hard disk run close to RAM disk 
speeds. Dramatic speed improve- 
ment for most programs. Supports 
cache of any size in main or ex- 
panded memory. 

Requires IBM PC/XT/AT or true 
clone. 


only $29.95 


‘multitasking for the IBM-PC.’ 





Ideal for developing applications 
in process control, data acquisi- 
tion, communications, and other 
areas. Check these features which 
make MultiDes Plus an unbeat- 
able value. : 


e Run up to 32 DOS programs con- 
currently. 

e Operator commands to load/run 
programs, change priority, check 
program status, abort/suspend/ 
resume programs. 

Programmatic interface via INT 15H 
for the following. 


Intertask message communi- 
cation. 

Task control by means of 
semaphores. 

256 priority levels. 

Suspend task for specified 
interval. 

Spawn and terminate external 
and internal tasks. 
Disable/enable multitasking. 
and more! 


Requires IBM PC/XT/AT or true 
clone, and enough memory to hold 
MultiDos Plus (48 KB) and all your 
application programs. 


$24.95 «+ $99.95 


With source code 
(Written in Lattice C 
and Microsoft Assembler.) 


Outside USA add $5.00 shipping and handling. 
Visa and Mastercard orders only call 
toll-free: 1-800-872-4566, ext. 350., or 
send check or money order (Drawn 
on U.S. Bank Only) to: 


NANOSOFT 


13 Westfield Rd, Natick, MA 01760 
MA orders add 5% sales tax. 
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Listing One (Listing continued, text begins on page 106.) 


-- restore the user level 
set userLevel to entryUserLevel 


else 
-- we're on the supply card, so it would be bad form to delete 


-- send a signal 
show card field "No Delete Here” 


-- wait a moment 
wait 1 seconds 


-- hide the signal 
hide card field "No Delete Here" 
end if 
end mouseUp 


Button 2 
Description 

The button's name is “Scouting Toolkit Window" 
Its Show name property is false 
Its Auto hilite property is true 
Its style is shadow 
It has no icon 
Its rectangle is 300 units wide, 182 units high 
The button's located at card location (197,144) 
Its text properties are: System Font 12, Height 16, Align center 


Seript 


on mouseUp 
-- make a noise 
play "boing" won 


-- close the kit 
hideScoutingToolkit 


-- show the trigger 
show button "Scouting Toolkit Icon" 
end mouseUp 


wn nnn rr hideScoutingToolkit -------<----<---<-------- 
on hideScoutingToolkit 

-- hide the kit's buttons 

hide button "Home" 

hide button "Back" 

hide button "Next" 

hide button "Previous" 

hide button "Toggle Pattern Window" 

hide button "Toggle Tool Window" 

hide button "Toggle Message Box" 

hide button "Toggle Menubar" 

hide button "Scouting Toolkit About" 

hide button "Scouting Toolkit™™" 

hide button "Scouting Toolkit Window" 
end hideScoutingToolkit 


Button..3 
Description 
The button's name is "Scouting Toolkit™™" 
Its Show name property is true 
Its Auto hilite property is true 
Its style is opaque 
It has no icon 
Its rectangle is 120 units wide, 20 units high 
The button's located at card location (296,160) 
Its text properties are: System Font 12, Height 16, Align center 
Script 


on mouseUp 
—- pass the message through (continued on page 76) 
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praise It. 


C served us well in the days of kilobytes and kilohertz. It was the only 
language we could implement efficiently on our newborn microcom- 
puters. But with today's mega-machines, shouldn’t we demand more 


from our compilers? 


Modula-2 increases productivity by catching your errors at compile 
time. You'll easily modularize and structure your programs, driving the 
hordes of barbaric bugs into the hinterlands. And Modula-2 does all 
this without taking away the low-level machine access that made C so 


popular. 


Until now, you had to pay a price for the Modula-2 advantages — per- 
formance just didn’t measure up to C But we've changed all that. In 


a suite of benchmarks developed by PC Week: 


Stony Brook Modula-2 outperforms 
the best C compilers on the market 


(and no other Modula-2 compiler even comes close). 


Stony Brook Modula-2, for 80x86 machines, produces Microsoft-compatible 
objects, and fully supports both Microsoft Windows and OS/2. It’s the only high- 
level language compiler that lets you write dynamic link libraries. It handles 52- 
and 64-bit real numbers with in-line 80x87 coprocessor instructions or software 
emulation. And Stony Brook Modula-2 supports six memory models and mixed 


model programming. 


You might want to bury your C compiler 
once you have used Stony Brook Modula-2, but 
you won't have to. We made it possible to 
directly call C and other lanquages from 
Modula-2, so you won't have to throw away 
your investment in C code. 


So, friends, programmers, and C-users, lend us 
your ears. Call us or write for more information 
and to find out how you can get a demo 
compiler. 
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Benchmark StonyBrook Logitech Turbo woe ah 











M-2 V1 M-2 V3 C V1 V4 

Magnifier 0.05 0.06 0.05 0.05 

For Loop 0.28 0.73 0.44 0.68 

While Loop 0.35 0.75 0.49 0.66 

Repeat Loop 0.33 0.68 0.38 0.66 

Literal Assign 0.33 0.97 0.60 0.94 
Memory Access 0.33 1.04 0.55 1.00 

Real Arithmetic 4.68 13.40 3.73 2.96 

Real Algebra 4.18 12.87 3.07 3.64 

Vector 0.77 1.49 1.21 1.26 

Equal If 0.66 1.47 0.93 1:32 
Unequal If 0.66 1.43 0.99 1.32 

No Parameters 0.33 0.60 0.34 1.04 

Value 0.50 0.71 0.60 1.21 

ae Reference 0.61 0.77 0.66 1.21 
. Real Maths 3.90 4.61 7.85 18.51 


The compiler package includes DOS runtime library objects and full sources 
for our split-screen text editor for $195. The development package includes all 
of the above pius an automatic make utility, a symbolic debugger, and run- 
time library sources for $345. MasterCard and Visa accepted. Add $5 for ship- 
ping in North America, $25 for overseas shipping. 


Forest Road, Wilton, New Hampshire 03086 @ (603)654-2525 Ask for Cleopatra. 
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Listing One (Listing continued, text begins on page 106.) 
send mouseUp to button "Scouting Toolkit Window" 


PC TECH JOURNAL : end mouseUp 
"Product of the Month" _—s‘«g@_—s|sé------------ - nnn 
"... a technological tour de 
force for fast PC graphics." Button 4 
Description 


NO ROYALTIES! The button's name is “Scouting Toolkit About" 
s Its Show name property is false 
Its Auto hilite property is true 
Its style is transparent 
It has an icon, ID# 30011 
Its rectangle is 24 units wide, 22 units high 
The button's located at card location (466,150) 
Its text properties are: System Font 12, Height 16, Align center 


Script 
SE a ee om ee ae ae ea oa eS ROUGE: 2a ee 
on mouseUp 
-- show the copyright notice 
show card field "Copyright" 
-- a little sound effect 
play “harpsichord" "c e g" 
-- wait for a mouse click 
¢ auto-cursor tracking wait until the mouseClick 
¢ pull-down menus -—- a little sound effect 
lay "harpsichord" "g e c" 
* pop-up windows aeee = q 
e comprehensive é -—- hide the copyright notice 
. . hide card field "Copyright" 
graphic functions aiid “ncaa 
¢ multiple fonts 
poems «6M | 
Button 5 
"filled-outline" fonts. Description 3 
- Face fonts for bold, italic, under- er fee ret saeee Sewers: 


; , ; Its Show name property is false 
line or strike-out stylings. Its Auto hilite property is true 
¢ Full "RasterOp" transfer Its style is shadow 

functions for writing, erasing, It has an icon, ID# 30009 

rubberbanding or dragging: Its rectangle is 42 units wide, 42 units high 

lines, text, icons, bit images The button's located at card location (225,193) 

and complex objects. Its text properties are: System Font 12, Height 16, Align center 


* Create pop-up menus, Re Tee ee Jie Uae eet ee LE aes 
windows and icons. Dit eeubeie : 
¢ Supports IBM's new PS/2 VGA 


-- no built-in check for visibility, so... 
and MCGA graphics. global menubarState 


-- toggle the menubar's visibility 
if menubarState is "hidden" then 
show menubar 
put "showing" into menubarState 
else 
hide menubar 
put "hidden" into menubarState 
end if 
end mouseUp 


Button 6 
Description 
The button's name is "Toggle Message Box" 
Its Show name property is false 


Its Auto hilite property is true 
Its style is shadow 


It has an icon, ID# 30008 

Its rectangle is 42 units wide, 42 units high 

The button's located at card location (292,193) 

Its text properties are: System Font 12, Height 16, Align center 
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Eco-C88 


C Compiler with 
Cmore Debugger 


on mouseUp 


-- toggle the message window's visibility 
if the visible of message box is true then 
hide the message box 
else 
show the message box 
end if 
end mouseUp 


Button 7 


Description 
The button's name is "Toggle Tool Window" 
Its Show name property is false 
Its Auto hilite property is true 
Its style is shadow 


“T’m very impressed with the com- 
piler, editor, and debugger. I’ve tried 
quite a few different compilers for the 
PC and have given up on all of the 
others in favor of yours... I’ve gotten 
to the point where I download C code 
from a DEC VAX/VMS system just to 


be able to compile it with the picky 
flag set at 9. It finds lots of things 
VMS totally ignores...” 

JS, Oak Ridge, TN 


It has an icon, ID# 30007 

Its rectangle is 42 units wide, 42 units high 

The button's located at card location (359,193) 

Its text properties are: System Font 12, Height 16, Align center 


Script 


on mouseUp 
-- toggle the tool palette window's visibility 
if the visible of tool window is true then 
hide tool window 
else 
show tool window 
end if 
end mouseUp 


Button 8 
Description 

The button's name is "Toggle Pattern Window" 
Its Show name property is false 
Its Auto hilite property is true 
Its style is shadow 
It has an icon, ID# 30006 
Its rectangle is 42 units wide, 42 units high 
The button's located at card location (426,193) 
Its text properties are: System Font 12, Height 16, Align center 


Script 


on mouseUp 
-- toggle the pattern palette's window's visibility 
if the visible of pattern window is true then 
hide pattern window 
else 
show pattern window 
end if 
end mouseUp 
Our Guarantee: Try the Eco-C88 compiler for 
$99.95. Use it for 30 days and if you are not 
completely satisfied, simply return it for a full 
refund. We are confident that once you’ve 
tried Eco-C88, you’ll never use anything else. 
Call or write today! 


Button 9 
Description 

The button's name is "Previous" 
Its Show name property is false 
Its Auto hilite property is true 
Its style is shadow 
It has an icon, ID# 30001 
Its rectangle is 42 units wide, 42 units high 
The button's located at card location (225,259) 
Its text properties are: System Font 12, Height 16, Align center 


Script 
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on mouseUp 


-- move to the previous card (continued on next page) 
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THE ORIGINAL Listing One (Listing continued, text begins on page 106.) 


doMenu "Prev" 


Vemor ef ee 


Button 10 
Description 

The button's name is "Next" 
Its Show name property is false 
Its Auto hilite property is true 
Its style is shadow 
It has an icon, ID# 30002 
Its rectangle is 42 units wide, 42 units high 
The button's located at card location (292,259) 


Expander! 





You've read about it! ‘ oe properties are: System Font 12, Height 16, Align center 
¥ ‘ cri 

You've talked about it! Beta eR eee Sea phavang eee ee 
i . on mouseU 

You've dreamed about it! = asia. 68 Uriel nels ote 


doMenu “Next" 
end mouseUp 


Bree VOIP TIO) CE cs el ee ee 


. . 1 
immediately! ee 
Description 
. The button's name is “Back" 
Easy to install! Its Show name property is false 
a s,s Its Auto hilite property is true 
Just jack It in! Its style is shadow 
It has an-icon, ID# 30003 
Male Or Female! Its rectangle is 42 units wide, 42 units high 
The button's located at card location (359,259) 
No need to upgrade your Its text properties are: System Font 12, Height 16, Align center 
Script 
old power supply! ai wenn nn nn nr nn ee mouseUp —---------------------------- 


on mouseUp 
-- go to the last card visited 
doMenu “Back" 

end mouseUp 


Ree a. 


Button 12 
Description 
The button's name is "Home" 
Its Show name property is false 
Its Auto hilite property is true 
Its style is shadow 
It has an icon, ID# 30005 
Its rectangle is 42. units wide, 42 units high 
The button's located at card location (426,259) 
Its text properties are: System Font 12, Height 16, Align center 
Script 


on mouseUp 
-- go home 
visual effect iris close 
doMenu "Home" 

end mouseUp 





Button 23 
Description 


WARNING: This unit is media The button's name is "Scouting Toolkit Icon" 
Its Show name property is false 


i 
dependent— don't forget to Its Auto hilite property is true 
. | Its style is shadow 
shut It off! It has an icon, ID# 30004 
Its rectangle is 42 units wide, 42 units high 
The button's located at card location (178, 83) 


ene (continued on page 83) 
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C Chest and 
Other C 
Treasures 





by Allen Holub 


This comprehensive anthology contains the popular “C 
Chest” columns from Dr. Dobb’s Journal of Software 
Tools, along with the lively philosophical and practical 
discussions they inspired, plus other information-packed 
articles by C experts. 


Topics covered include: pipes, wild-card expansion, and 
quoted arguments; sorting routines; command-line 
processing; queues and bit maps; utilities such as Is, 
make, and more; expression parsing; hyphenation; IBM 
cursor control and an Fget that edits; redirection; 

accessing IBM video display memory; trees; an AVL tree 

database package; directory traversal; sets; shrinking 
.EXE file images; hashing, expressions, and roman 
numerals; and statistical applications of digital low-pass 
filters. 


Other treasures include: a variable metric minimizer; 
Fgrep; a peephole optimizer; and curve fitting with cubic 
splines. 


All subroutines and programs are written in C, and are 
: available on disk with full source code. MS-DOS format. 


| Book & Disk (MS-DOS) Item #49-6 $38.95 
Book Item #40-2 $23.95 


Small Windows: 
A Library of 
Windowing 
Functions for the 

C Language 


by James E. Hendrix 





Small-Windows is a complete windowing library for C 
(Microsoft 4.0/5.0, Turbo C, Lattice C, and Small-C): The 


package includes: 


TO 
ORDER: Return the 
postage paid card on the next page or 


CALL TOLL-FREE 800-533-4372 
(In CA 800-356-2002) 





The Best C 
Articles from 
Dr. Dobb’s Journal 


Dr. 
Dobb’s 
Toolbook 
of C 


by the Editors of 
Dr. Dobb’s Journal 
of Software Tools 





This authoritative reference contains more than 700 pages 
of the best C articles and source code from Dr. Dobb’s 
Journal of Software Tools, along with new material by C 
experts. The level is sophisticated and pragmatic: 
appropriate for professional C programmers. You'll find 
hundreds of pages of useful C source code, including a 
complete compiler, an assembler, and text- processing 
utilities. Highlights include: 


¢ James E. Hendrix’s famous Small-C Compiler and New 
Library for Small C 

« Also, James E. Hendrix’s Small Mac: An Assembler for 

Small C and Small Tools: Programs for Text Processing 

All of Anthony Skjellum’s C Programmer’s Notebook 

columns distilled into one thought-provoking chapter 


Book Item #615-3 $29.95 
¢ 18 video functions ee 
written in assembly Complete Source 
language ae 
« 7 menu functions that Code Included 
support both static Microsoft 4.0/5.0, 
= pee eee Turbo C, Lattice 
¢ 41 window functions to 
clean, frame, move, 3.0 and Small © 
hide, show, scroll, push are all supported 
and pop windows eT 


A file directory facility illustrates the use of window menu 
functions and provides file selection, renaming, and 
deletion capability. Two test programs are provided as 
examples to show you how to use the library and the 
window, menu, and directory functions. 


The Small-Windows package is available for MS-DOS 
systems, and Microsoft C Version 4.0, Turbo C, Lattice C 
and Small-C compilers. Documentation and full C source 
code is included. 


Manual & Disk (MS-DOS) 
(Microsoft C, Small-C, Lattice C, or Turbo C Compiler) 
item #35-6 $29.95 


* Also available at your local bookstore 


Unix-Like 
Programming 
Tools for MS-DOS 


> 


On Command: Buu 
Writing a Unix- Pe 
Like Shell for rn 
MS-DOS PASTS 


eee 





BEBE eB 
by Allen Holub 





This book and ready-to-use program demonstrate how to 
write a Unix-like shell for MS-DOS, with techniques 
applicable to most other programming languages as well. 
The book and disk include a detailed description and 
working version of the Shell, complete C source code, a 
thorough discussion of low-level MS-DOS interfacing, and 
significant examples of C programming at the system 
level. 


Supported features include: read, aliases, history, 
redirection and pipes, Unix-like command syntax, MS- 
DOS-compatible prompt support, C-Shell-based shell 
scripts, and a Shell variable that expands to the contents 
of a file so a program can produce text that is used by 
Shell scripts. The Unix-like control flow includes: if/then/ 
else; while; foreach; switch/case; break; and continue. 


The ready-to-use program and all C source code are 
included on disk. For IBM PC and direct compatibles. 


Book & Disk (MS-DOS) Item #29-1 $39.95 





When used with the Shell described in On Commana, this 
collection of utility programs and subroutines provides you 
with a fully functional subset of the Unix environment. 
Many of the utilities may also be used independently. 
You'll find executable versions of cat; cp; date; du; echo: 
grep; Is; mkdir; mv; p; pause; printevn; rm; rmdir; sub: and 
chmod. 


The \Util package includes complete source code on disk 
and all programs (and most of the utility subroutines) are 
fully documented in a Unix-style manual. 


Manual & Disk (MS-DOS) Item #12-7 $29.95 


NR: 
A Implementation 
of the Unix NROFF 


Word Processor 





by Allen Holub 


NR is a text formatter written in C and compatible with 
Unix’s NROFF. Complete source code is included in the 
NR package so that it can be easily customized to fit your 
needs. NR also includes an implementation of the -ms 
(manuscript) macro package and an in-depth description 
of how -ms works. NR does hyphenation and simple 
proportional spacing. It supports automatic table of 
contents and index generation, automatic footnotes and 
endnotes, italics, boldface, overstriking, underlining, and 
left and right margin adjustment. NR also contains: 


* extensive macro and string capabilities 

* number registers in various formats, including Roman 
and Arabic numerals, both spelled out and in outline 
form 

* diversions and diversion traps (macros that are triggered 
automatically) 

¢ input and output line traps 


NR comes configured for any Diablo-compatible printer, as 
well as Hewlett Packard’s ThinkJet, and LaserJet. It is 
easily configurable for most other printers. Both the ready- 
to-use program and full source code are included. For PC 
compatibles. 


Manual & Disk (MS-DOS) Item #33-X $29.95 


TO ORDER: 
Mailinthe attached 
postage paid order card or 


CALL TOLL FREE 800-533-4372 
(in CA 800-356-2002) —__ 





SPECIAL OFFER 


Receive On Command, \Util, and NR together for only 
$85.95! You save 15% |! 2 


Unix-like Features Package Item #167 $85.95 








* Also available at your local bookstore 
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The Programmer's 


Essential OS/2 
Handbook 


AS 


s aed Ke. 
by David E. Cortesi MAE CROP SSO 
LESS EST RSS 





The Programmer’s Essential OS/2 Handbook will let 
you harness the power of OS/2, without getting lost in its 
intricacies. This hands-on, working reference book is 
organized to guide you through the complex features of 
the new OS/2 system. You'll even find detailed technical 
information that is not included in the official OS/2 
documentation. Multiple indices and a web of cross- 
referencing provide easy access to all OS/2 topic areas. 
Equal support for Pascal and C programmers is provided. 
You'll find: 


* an overview of OS/2 architecture and vocabulary, 
including references to where the book handles each 
topic in depth 

¢ alook at the 80286 and a description of how the CPU 
processes data in real and protected mode 

* an overview of linking, multiprogramming, file access, 
and device drivers 

* in-depth discussions of important OS/2 topics, including 
dynamic linking; the message facility; the screen group; 
keyboard, mouse, and screen input, output and 
monitors; the queue; the semaphore; the thread; the 
process; storage allocation; segment swapping; and 
lIOCTL usage 

¢ detailed accounts of nearly 300 system calls, including 
DOS calls, keyboard calls, video calls, mouse calls, and 
device driver aids. 


The Programmer’s Essential OS/2 Handbook is a 
resource no programmer developing in the OS/2 
environment can afford to be without. 


Book & Disk (5-1/4" & 3" OS/2) Item #89-5 $39.95 
Book Item #82-8 $24.95 





Taming 
MS-DOS 

for customizing th 

ae 2nd Edition 


“TAMING 
MS-DOS 


Tools and Techniques 


by Thom Hogan | 





A new and improved version of Hogan’s popular first 
edition, Taming MS-DOS Second Edition has been 
updated to cover MS-DOS 3.3. You'll learn how to 
maximize your batch files with routines using redirection, 
filters and pipes, and routines that prevent accidental 
reformatting of your hard disk, redefine function keys, and 
locate files within subdirectories. Other batch files will 
implement an MS-DOS help wywtem, including help text 
files, a menu system that interprets keyboard input, and 
routine for quick redefinition of function keys. 


Essential Operating 
System Information 
for Your Toolbox 


Ses eS ees eo Ie ee ee Ce 
Unix 
Programming 
on 80286/80386 








Unix Programming on 80286/80386 provides experienced 
system programmers with an overview of time-saving Unix 
features, and an in-depth discussion of the relationship 
between Unix and DOS including many helpful techniques 
specific to programming under the Unix environment on a 
PC. The book also includes complete coverage of: 


the Unix program environment 

the Unix file system 

Unix shells 

basic Unix utilities 

C programming under Unix 

mass storage programs 

80286 and 80386 architecture 
segment register programming 

Unix administration and documentation 


Unix Programming on 80286/80386 contains many 
useful examples of the device drivers necessary to 
communicate with PC peripherals. It also includes useful 
information on how to set up device drivers for AT 
compatibles, such as cartridge tape drives and raster scan 
devices. Many examples of actual code are provided. 


Book & Disk (Unix 5-1/4") ltem #91-7 $39.95 
Book Item #83-6 $24.95 





You'll also learn how to create 
configurable AUTO- 

EXE C.BAT files, and how to 
customize CONFIG.SYS 


Updated and 
Expanded to 
cover MS-DOS 


and use ANSI.SYS to change 3.3 a The 2nd 

the appearance of MS-DOS. Edition is better 

Taming MS-DOS Second than ever 
 ..rt—t—t—...i“‘( iSttsststs<CStsrsSCSSCSS 


Edition includes ready-to-use 
BASIC programs that enhance MS-DOS. You can rename 
directories and disk volumes, change file attributes, check 
available RAM and disk memory, display a memory- 
resident clock, and assign MSDOS commands to ALT 
keys. 


The programs, including batch files and MS-DOS 
enhancements, are available on disk with full source code. 


Book & Disk (MS-DOS) Item #92-5 $34.95 
Book Item #87-9 $19.95 


* Also available at your local bookstore 


Programming 
Techniques in C, 
Forth, or BASIC — 


The New BASICs: 
Programming 
Techniques 

and Libraries 





by Namir Clement Shammas 


This book will orient the BASIC programmer to the syntax and 
programming features of the new BASICs, including Turbo 
BASIC, Quick BASIC, and True BASIC. You'll learn the details 
of implementing subroutines, functions and libraries to permit 
more structured coding. The New BASICs contains many 
programming examples and ready-to-use libraries, including 
libraries for string manipulation, extended string management, 
and sorting and searching. You'll also find a binary tree library, 
DOS files library, a library for Pascal-like sets, and much more. 


Book & Disk (MS-DOS) 
Book 


Item #43-7 
Item #37-2 


$39.95 
$24.95 


TO ORDER: 

Mail in the postage 

paid order card on the 

previous page or CALL TOLL FREE 


800-533-4372 
(in CA 800-356-2002) 





Dr. Dobb’s 
Toolbook 
of Forth 


Edited by Marlin Ouverson 
This comprehensive collection of useful Forth programs and 
tutorials contains expanded and revised versions of Dr. Dobb’s 
Journal of Software Tools’ best Forth articles, along with new 
Forth material. Contents include: mathematics in Forth, 
modifications/extensions, Forth programs, Forth — the 


language, and implementing Forth. You’ll also find appendixes 
that will help you convert fig-Forth to Forth -83. 


The screens in the book are available on disk as ASCII files. 
Book & Disk (MS-DOS, Apple Il, Macintosh, or CP/M: 


Osborne, 8: SS/SD) Item #57-7 $39.95 
Book item #10-0 $22.95 


Turbo C: 

The Art of 
Advanced Program 
Design, Optimization 
and Debugging 





by Stephen R. Davis 


Overflowing with example programs, this book fully describes 
the techniques necessary to skillfully program, optimize and 
debug in Turbo C. Every topic and Turbo C feature discussed 
is fully demonstrated in Turbo C source code examples. 
Advanced topics such as pointers; direct screen I/O; inline 
statements in Turbo C; and how to intercept and redirect BIOS 
calls are all covered in depth. The author further demonstrates 
these advanced topics by writing a RAM resident pop-up 
program in Turbo C. In addition the author fully outlines the 
differences between Unix C and Turbo C; the transition from 
Turbo Pascal to Turbo C; and the superset of K&R C features 
implemented in Turbo C and included in the proposed ANSI C 
standard. 


Book & Disk (MS-DOS) 
Book 


Item #45-3 
item #38-0 


$39.95 
$24.95 


Dr. Dobb's 
Toolbook 
of Forth, 
Volume Il 


HERR eee 
by the editors of 
Dr. Dobb's Journal 


of Software Tools 





This complete anthology of Forth programming techniques and 
development picks up where Dr. Dobb's Toolbook of Forth 
left off. You'll find the best articles of Forth from Dr. Dobb's 
Journal of Software Tools, along with the latest material from 
other Forth experts. Topics include: Forth philosophy and 
standards, programming windows, extended control stuctures, 
the design of a Forth target compiler, and more. 


The screens in the book are available on disk as ASCII files. 
Book & Disk (MS-DOS, Apple Il, Macintosh, or CP/M: 


Osborne, 8" SS/DS) Item #51-8 $45.95 
Book Item #41-0 $29.95 


* Also available at your local bookstore 
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on mouseUp 
-- make a noise 
play "boing" How 


Listing One (Listing continued, text begins on page 106.) 


Its text properties are: System Font 12, Height 16, Align center 
Script 


-- hide this button 
hide button "Scouting Toolkit Icon" 


-- show the toolkit 
showScoutingToolkit 
end mouseUp 


on showScoutingToolkit 
-- show the 


show 
show 
show 
show 
show 
show 
show 
show 
show 
show 
show 


button 
button 
button 
button 
button 
button 
button 
button 
button 
button 
button 


toolkit's buttons 
"Toggle Menubar" 
"Scouting Toolkit Window" 
"Scouting Toolkit About" 
"Scouting Toolkit™" 
"Toggle Message Box" 
"Toggle Tool Window" 
"Toggle Pattern Window" 
"Previous" 

"Next" 

"Back 1 

“Home™ 


end showScoutingToolkit 


Button 14 


Description 
The button's name is "Duplicate Scouting Toolkit" 
Its Show name property is false 
Its Auto hilite property is true 
Its style is shadow 
It has an icon, ID# 30000 
Its rectangle is 42 units wide, 42 units high 
The button's located at card location (460,12) 


Its text properties are: System Font 12, Height 16, Align center 


Script 


on newButton 
-- make sure we don't mess up the supply card 


if short name of this card is not “Scouting Toolkit" then 


-- save and set the user level 
get userLevel 

put it into entryUserLevel 

set userLevel to 5 


-- set the cursor to the watch 


set cursor to 4 


-- set the tool 
choose button tool 


-—- for all the buttons in the set 
repeat with buttonNumber = 1 to 13 


—- remember where we are (the target card) 
push card 


—— hide screen commotion 
set lockScreen to true 


—-— go to the supply card 


go to card "Scouting Toolkit" of stack "Scouting Toolkit™" 


—- select the button 
click at loc of button buttonNumber 


(continued on next page) 
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goodbye 
dBase! 






dBASE Programmers 


You need it! 
(®% You can handle it! 
(7 2dB2c is here now! 


dB2c Offers: 

¢ Version 2.0 complete with 
Translator and File 
Handlers. 

¢ Extensive implementation 
of dBASE Ill+ with over 200 
functions and commands in 
C source code. 

¢ Contains our own File 
Handlers plus interfaces for 
Lattice's dBC and Faircom's 
c-tree. 

¢ Supports screen I/O with 
ANSI.SYS or fast assembler 
routines. 

e Support for Microsoft, 
Lattice and Turbo C 
compilers. 

¢ Tutor features of trans!ation 
combined with familiar 
syntax of the library eases 
the transition to 'C’. 

¢ One version supports MS- 
DOS, Xenix, Unix, OS-9 
and Concurrent DOS. 


are you 
ready? 





Toolkit $299 


Call or Write: 
———— SOFTWARE 
DAVID |. CONNECTION, INC. 
POB 712, Ely, MN 55731 
MARSH (218) 365-5097 
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They Were Driven... 





To Every Device! Listing One (Listing continued, text begins on page 106.) 





-- copy the button 
doMenu "Copy Button" 


-- return to the target card 
pop card 


--— show screen commotion 
set lockScreen to false 


—- paste the button 
doMenu “Paste Button" 


end repeat 


-- copy the copyright notice 


JACK had a restless urge copyCopyrightField 
to program — and a -- get rid of this duplication button 


system to boot. 





SYLVIA's heart belonged 


choose button tool 
click at loc of button "Duplicate Scouting Toolkit" 
doMenu "Cut Button" 


—-- move two buttons 
drag from loc of button "Scouting Toolkit Icon" to loc of button "Back" 
hide button "Scouting Toolkit Icon" 


drag from loc of button "Delete Scouting Toolkit" to loc of button "Home" 


-- hide the toolkit 
choose browse tool 
click at loc of button "Scouting Toolkit Window" 


-- restore the user level 
set userLevel to entryUserLevel 
end if 
end newButton 


bey  s  e e SS edc  f aeemeetne enema orang neha temas iiss dears copyCopyrightField -----------------------—-- 
to him — but she nearly on copyCopyrightField 

—- save our location 
dropped the character. push card 





-- hide screen commotion 
set lockScreen to true 


-- go to the supply card 
go to card "Scouting Toolkit" of stack “Scouting Toolkit™" 


-- set tool 
choose field tool 


-- select the field 
show card field "Copyright" 
click at loc of card field "Copyright" 


-- copy the button 
doMenu "Copy Field" 


ZELDA was the baud -- hide the field 


one. But her bit was worse : 


than her byte. 


hide card field "Copyright" 


-- and get the field's contents 
get card field "Copyright" 


-- return to the target card 
pop card 


-- show screen commotion 


Read about them in: set lockScreen to false 


THE 


-- paste the field, fill it up, and hide it 
doMenu “Paste Field" 
put It into card field "Copyright" 


end copyCopyrightField 


A New Novel By 


Emmis Daws 


Rte re ee et re eae ne ar Oh ene a MOUSCUD ~<< 89988 98989 $59 eee See Seen === 
on mouseUp 


$17 95 -- make sure we're at the supply card 
& if short name of this card is “Scouting Toolkit" then 


-- show the watch cursor 
set cursor to 4 
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& 
Announcing... 
-- copy the button Th 
choose button tool e 


click at loc of button "Duplicate Scouting Toolkit" 
doMenu "Copy Button" 





-- restore tool PLO ON 
choose browse tool . 
end if 
end mouseUp 


Button 15 
Description 
The button's name is "Copyright" 
Its Show name property is false 
Its Auto hilite property is true 
Its style is transparent 
It has an icon, ID# 30000 
Its rectangle is 70 units wide, 13 units high 
The button's located at card location (0,52) 
Its text properties are: System Font 12, Height 16, Align center 
Script 


Susi Programmer's 


-- pass message on to the toolkit's About button 









at pets Ty es ogee 
mo oe 
- SN ANKY 









send mouseUp to button “Scouting Toolkit About" 


ops nous Power Pack 


Card Field 1 
Description 
The field's name is "Copyright" 
It's hiddden 
Its Lock text property is true 
Its Show lines property is false 
Its Wide margins property is false : . 
itawcyis is bectangls and systems integrators with your 
Its rectangle is 286 units wide, 129 units high 
The field's located at card location (204,190) 
Its text properties are: Geneva 12, Height 16, Align center postcard ad. The Programmer's Power 
Contents 
"©1987 by Stan Krute's Camp Creek Institute. 
All rights reserved. : : : 
Bd8s cortig bee dec wea et ai Pack card deck targets this elite audi- 
18617 Camp Creek Road 
Hornbrook, California96044 ; i j 
[916] 475-3428" ence, including subscribers to Dr 
Script 
The field has no script 


ow you can reach 100,000 





programmers, consultants, 


Dobb's Journal of Software Tools, for 


Card Field 2 only a little over a penny a contact! 
Description 
The field's name is "No Delete Here" 
It's meee ’ The Programmer's Power Pack 
Its Lock text property is true ; 
Its Show lines property is false Card Deck 
Its Wide margins property is false Next Mailing Date: July 3. 1988 
Its style is opaque i “ahh 
Its rectangle is 39 units wide, 39 units high Reservation Closing: June 5, 1988 


The field's located at card location (37,293) 
Its text properties are: Geneva 9, Height 12, Align center 


Contents For advertising rates, card specifications, and 
“Not Here, 
Though." to reserve your space, contact: 

Script 


The field has no script 


GLYNN MANSFIELD 
National Account Manager 


415-366-3600 
End Listing 
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'THE PROGRAMMERS SHOP 


helps save time, money, and cut frustrations. Compare, evaluate, and find products. 


RECENT DISCOVERY 


MacFortran/020 by Absoft. Optimized 
FORTRAN-77 with VAX, 8X exten- 
sions, 68881 support, arrays memory 
or disk, complex math. Source debug, 
toolbox, C interfaces. 

MAC 512, SE, II $449 


Al Expert System Dev’t 


Arity Combination Package PC 
CxPERT V3.0 - shell forC MS 
Experteach II PC 
Level 5 - formerly Insight 2. MS 
T.I.: PC Easy PC 
Personal Consultant Plus PC 
Turbo Expert-Startup(400 rules) PC 
Corporate (4000 rules) PC 


Al-Languages 


A.P.T. - Active Prolog Tutor PC $ 49 
ARITY Prolog - Interpreter PC $ 229 
PC Scheme LISP - by TI nS -79 
TransLISP - learn fast MS $ 79 
TURBO PROLOG by Borland PC $ 69 
Turbo Prolog Toolbox PC 3.69 
C Language-Compilers 
AZTEC C86 - Commercial 
C86 PLUS - by Cl 
Datalight Optimum-C 
High C Optimizing Compiler 
Instant-C - source, debug. 
Instant-C/16M 
Lattice C - from Lattice 
Microsoft C 5.0 - Codeview 
Microsoft Quick C 
Rex-C/86-standalone ROM 
Turbo C by Borland 


C Language-Interpreters 


C-terp by Gimpel - fullK &R MS $ 219 
C Trainer - by Catalytix PC 3 :.:89 
Interactive C by IMPACC Assoc. PC $ 189 
Run/C Professional 

Run/C Lite 

Turbo C-terp 


C Libraries-Files 


BTree Source, no royalties 
CBTREE-Source, no royalties 
ctree by Faircom-no royalties 
ctree w/ rtree 
rtree - report generation 
dB2C Files 
dB2C Toolkit V2.0 
dbVISTA - Object only 
dBx - translator 

w/source to library 


FEATURES 


CO/SESSION - Remotely access PC and 
peripherals, train or trouble-shoot from 
off-site, 2 users on one program. 

Session record/playback, file transfer, 
terminal emulation, keyboard and 
voice modes. PC $ 229 

CLARION DBMS by Barrington Systems. 
Fast applications prototyping and develop- 
ment. Language, compiler, screen/ 
report generators, editor, call other 
languages, read/write dBASE III + 
files. PC List: $ 695 

*Mention “Special DD488” and get both 
a good price and FREE Software! 


PC $ 499 


FREE Catalogs and Guarantee 


Whether you're searching for an obscure product no 
one seems to know about, or you just want to know 
which of 5 competitors makes the most well-regarded 
product, our catalogs make finding software easier. 

- Comprehensive Product Listing, filled with 
over | 000 products. 

- Popular Programmer’s Tools, containing the 
most-requested titles (over 300 in all) from 
each category. 

- Dbase Programmer's Catalog with over 60 
development tools. 

We'll also help you select products with free advice or 
literature. Plus full guarantee on any recommended 
product. Mention “DD488.” 

Call to request a catalog or information today. 
Our Services: 

+ International Sales Desk * Dealers Inquiry 
* Compare Products + Newsletter 
* Help find a Publisher * Rush Order 
+ Evaluation Literature FREE * Over 700 products 
* Programmer’s Update + National Accounts Center 


C Libraries-General 


Blackstar C Function Library PC 
C Tools Plus - V5.0 PC 
C Utilities by Essential PC 
Entelekon C Function Library PC 
Greenleaf C Sampler PC 
Greenleaf Functions PC 
LIGHT TOOLS by Blaise PC 
Turbo C Tools by Blaise r 


C Power Windows by Entelekon PC 
C Worthy Interface Library PC 
Curses by Aspen Scientific PC 
dBASE Graphics for C PC 
ESSENTIAL GRAPHICS-fast 
FontWINDOW/PLUS 
GraphiC - new color version 
Greenleaf Data Windows 

w/source 
LightWINDOWS/C for Datalight 
Panel/TC - for Turbo C 
PC Forms-by Golden Software MS 
ScreenStar - with source PC 
Terminal Mapping System PC 
TurboWINDOW/C-for Turbo C PC 
View Manager - by Blaise PC 
Vitamin C - source, menus PG 

VC Screen - screen paint PC 
Windows for C - fast PC 
Windows for Data - validation PC 
ZView - screen generator MS 


DataBase & File Management 


Advanced Revelation PC 
COL PC 
DataFlex by Data Access PC 
DataFlex multiuser PC 
Magic PC re 
Paradox - original PC 
Paradox V2.0 List: $725 PC 


DBASE Language 


Clipper compiler 
dBASE III Plus 
dBASE III LANPack 
DBXL Interpreter 
FoxBASE+ - V2.0 
Quicksilver Diamond 


DBASE Support 


dAnalyst 

dBASE Tools for C 

dBRIEF with BRIEF-Auto-Indent, 
views structures 
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RECENT DISCOVERY 


Foxbase PLUS by Fox Software. DBMS 
conforms to standard MAC interface. Up 
to 9 definable output windows, defin- 
able buttons, import/export hyper- 
card stacks, MAC, Developer Kit, $339 


DBASE Support cont. 


dBC III by Lattice 

dBC III Plus 

dbug III 

Dialect UI 

dFLOW - flow charts 
Documentor - dFlow superset 
Genifer by Bytel-code generator 
QuickCode III Plus 

R&R Report Writer 

Seek-It - Query-by-example 
Silver Comm Library 

Tom Rettig’s Library 

UI Programmer-user interfaces PC 


Debuggers 


Breakout - by Essential PC 
CODESMITH - visual PC 
C SPRITE - data structures re 
DSD87 PC 
Periscope I re 
Periscope II PC 
Periscope II-X PC 
Periscope III-10 MHZ Version PC 
Pfix-86 Plus - by Phoenix PC 
SoftProbe II -embedded systems PC 


Editors for Programming 


BRIEF Programmer's Editor PC Call 
de - EMACS-style PC 
EMACS by UniPress Source: $895 
Epsilon - like EMACS PC 
KEDIT - like XEDIT PC 
ME Macro Editor - Source PC 
MKS VI MS 
PC/EDT - macros PC 
PC/VI - by Custom Software MS 
Personal REXX - V1.6 PC 
SPF/PC - Version 2.0 o, 
Vedit PLUS MS 


Fortran & Supporting 


ACS Time Series 

Forlib + 

Fortran Addenda 

I/O Pro - includes No Limit 

MACFortran by Microsoft 

MS Fortran - 4.0, full 77° 

PC-Fortran Tools - xref, pprint 
RM/Fortran 

Scientific Subroutines - Matrix MS $129 


Multilanguage Support 


BTRIEVE ISAM MS 
BTRIEVE/N - multiuser MS 
GSS Graphics Dev’t Toolkit rs. 
Halo Development Package MS 
HALO Graphics PC 
Help/Control - on line help rc 
Hoops 3D Graphics Library PC 
Informix 4GL-application builder PC 
Informix SQL - ANSI standard PC 
Instant Programmer’s Help MS 


MS $169 
PC $509 
MS $179 
PC $ 45 
$125 
$229 
$279 
$189 
$139 
$ 79 


Note: Mention this ad. Some prices are specials. Ask about COD and POs. 
Formats: 3” laptop now available, plus 200 others. UPS surface shipping 
add $3/per normal item. All prices subject to change without notice. 
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se a a shinies 


THE PROGRAMMERS SHOP 


provides complete information, advice, guarantees, and every product for Microcomputer Programming. 


AI TOOLS Order before 4/30/88 and mention “DD488” RECENT DISCOVERY 


for these Special Prices: : : 
List Normal SPECIAL C Talk by CNS - Object-oriented C program- 


Choose from a wide range of tools designed ming. Smalltalk-like message formats, 


to make Al applications powerful Expert Ist-Class Plus $495 $399 $359 contain ansulati soncyi 
Systems development easy. Arity Expert System Dev’t. $295 $229 $209 en i. : ee ee ae 
Arity Prolog Comp/Interp. $650 $569 $509 inheritance. , Lattice, Turbo, 


LISP and Prolog programmers: choose from : 
many powerful environments in addition to eae 5 ac he $395 $289 $259 i MS S122 


those listed here, or take advantage of the TransLISP PLUS w/runtime $345 $309 $ 99 Other Prod ucts cont. 


special prices. : : re 
Call a Tech Rep TODAY! "Pear tetae Active Sie eee Disk Technician-smart upkeep PC $ 89 
: Fast Back Plus PC $149 


. Flash-Up PC $ 69 
Multilanguage Support cont. Interactive Easy Flow V5.0 PC S125 


NET-TOOLS - NET-BIOS PC dB2C - requires toolkit MS $ 249 Link & Locate - Intel tools MS $309 
Norton Guides PC RTC PLUS by Cobalt Blue MS $ 399 Mace Utilities MS $ 85 
Opt Tech Sort - sort, merge MS SofTRAN - Translation Lang. PC $ 349 MKS Trilogy MS $ 99 
PANEL Plus MS TP2C PC $ 199 Plink 86 Plus - overlays MS $275 
Pfinish - by Phoenix MS Turbo-to-C-Tools by TGL PC $ 479 ~~ _PC-Metric - analyze complexity 


Sse eae RC DOCK 
Screen Sculptor PC Other Languages R-DOC/X 

SPSS/PC Plus PC ACTOR risC by IMSI - H.A.L. 
Synergy - create user interfaces MS Ada Dev’s Toolkit-Vol.1 & 2 Sapiens Make 

XQL - SQL for Btrieve MS $649 Alsys Ada w/ 4 M RAM Show Partner F/X 


Xtrieve - organize database MS APL*PLUS/PC PC $ 439 — Source Print - V3.0 
ZAP Communications - VT 100 PC $ 89 | CCS Mumps - Multiuser PC $ 359 = TLIB 


Microsoft MASM Special * | Tree Diagrammer 
OS Support Modula-2- V3.0Dev. System PC $ 199 Visible Computer: 8088 
DOS Merge 286 PC $139 Smalltalk/V MS $ 85 WKS Library by Tenon 


Microsoft Windows Special * SNOBOL4 + - great forstrings MS $ 80 Le 
Development Kit Special * RPG II Compiler by Lattice PC $ 639 ae 


C-Terp by Gimpel Software 
MKS AWK ae MS $ 65 Other Products Cobol - by Microsoft 
MKS Toolkit - Unix vi, awk =PC $115 Fort Dadica Lis ASs fi Snseiaion 
Norton Utilities Advanced MS $ 99 ASMLIB - 170+ routines PC $ 125 OFT AE OL RST OS eee ron TU aes 


ance ; FoxBASE+ $649 
System V/AT Combination PC $489 Back-It by Gazelle po : 0 RM/Cobol $959 


Xtree - Professional MS $109 Baler 
Dan Bricklin’s Demo II PC $ 169 Xenix Complete System 286 $999 


C Programmers: Combine C and COMMON LISP 
to Increase the Power of Your Software 


with 7JransLISP PLUS. for Only $99! 


Simple. Thorough. 


Add LISP features to your software without mak- TransLISP PLUS took over 400 primitives from 


ing it a full time job. The TransLISP PLUS tutorial, the most widely used and respected LISP standard, 
on-line help, and 30 sample programs with COMMON LISP, and made it available on IBM 


commented source make it easy. PCs, XTs, ATs, and virtually every other MSDOS 
machine. So now you can work with anything from 
: a $700 PC to a $7000 PC. 
Practical. The utilities toolbox is included at no charge with 
Start by modifying the LISP sample programs a built-in editor, pretty printer, cross reference, 
and including them in a system you wrote in C. and additional debugging tools. 
Yes, in C! TransLISP PLUS includes a C Language An optional Runtime encrypts your source code 
Interface that lets you integrate your Microsoft C so that you can distribute your applications safely. 
code and libraries with all or portions of our LISP You pay no royalties. 
interpreter. Requires MSDOS 2.0 +. 320K RAM, and a 360K floppy. 
Use TransLISP PLUS to add natural or command 
language features to replace menus... or to flexibly Royalty FREE Offer 


manage related but disparate information. Code : ‘ : 
from C libraries provided by other vendors can be This special offer from The Programmer's Shop 


integrated into your program to perform tasks not includes the $150 TransLISP Runtime. Create 
normally part of LISP. encrypted versions of your LISP source and dis- 
List $318 tributed unlimited copies without paying royalties 


— ‘. to The Coder’s Source. You must order by 3/31/88 
) ae. Special Offer $99 to take advantage of this special offer. 


(>) Coder’s Offer good from 1/1/88 to 3/31/88 
oo Source ™ 541 #Main St., Suite 412, So. Weymouth, MA 02190 1-800-421 8006 


Call for a catalog, literature, advice, and service you can trust. 


{5:3 .-8: ME:S.T. ee _ re 
ane de ernie 800-421-8006 rHE PROGRAMMER’S SHOP 
: ; = gt elias aCe eae ee 8 ee 
Mass: 800-442-8070 or 617-740-2510 2/88 
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TOTAL CONTROL 


with LMI FORTH" 





For Programming Professionals: 


an expanding family of 
compatible, high-performance, 
Forth-83 Standard compilers 
for microcomputers 


For Development: 
Interactive Forth-83 Interpreter/Compilers 


e 16-bit and 32-bit implementations 

Full screen editor and assembler 

Uses standard operating system files 

400 page manual written in plain English 

Options include software floating point, arithmetic 
coprocessor support, symbolic debugger, native code 
compilers, and graphics support 


For Applications: Forth-83 Metacompiler 


e Unique table-driven multi-pass Forth compiler 

¢ Compiles compact ROMable or disk-based applications 

e Excellent error handling 

e Produces headerless code, compiles from intermediate 
states, and performs conditional compilation 

e Cross-compiles to 8080, Z-80, 8086, 68000, 6502, 8051, 
8096, 1802, and 6303 

e No license fee or royalty for compiled applications 


For Speed: CForth Application Compiler 


e Translates “high-level” Forth into in-line, optimized 
machine code 
e Can generate ROMable code 


Support Services for registered users: 


e Technical Assistance Hotline 
e Periodic newsletters and low-cost updates 
e Bulletin Board System 


Call or write for detailed product information 
and prices. Consulting and Educational Services 
available by special arrangement. 





Phone credit card orders to: (213) 306-7412 


Overseas Distributors. 

Germany: Forth-Systeme Angelika Flesch, Titisee-Neustadt, 7651-1665 
UK: System Science Ltd., London, 01-248 0962 

France: Micro-Sigma S.A.R.L., Paris, (1) 42.65.95.16 

Japan: Southern Pacific Ltd., Yokohama, 045-314-9514 

Australia: Wave-onic Associates, Wilson, W.A., (09) 451-2946 
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Laboratory Microsystems Incorporated 
Post Office Box 10430, Marina del Rey, CA 90295 








— STRUCTURED 
PROGRAMMING 


Listing One (Text begins on page 118.) 


DEFINITION MODULE LineDwg; 


EXPORT QUALIFIED 


width, height, CharWidth, CharHeight, PaintMode, Px, Py, 
mode, dot, line, paint, copyArea, clear, Write, WriteString; 


TYPE PaintMode = (replace, add, invert, erase); 


VAR Px, Py : INTEGER; (* Current coordinates of drawing pen 
mode : PaintMode; (* Current mode for paint and copy 
width : INTEGER; (* Width of picture area, read-only 
height : INTEGER; (* Height of picture area, read-only 
CharWidth : INTEGER; (* Width of a character 
CharHeight : INTEGER; (* Height of a character 


PROCEDURE dot (c : 


PROCEDURE line (d, n: 


PROCEDURE paint (c : 


PROCEDURE copyArea (Sx, sy, 


PROCEDURE clear; 


PROCEDURE Write (ch : 
PROCEDURE WriteString (s 


END LineDwg. 


CARDINAL; x, y : INTEGER); 
(* Place a dot at coordinate x, y in color c *) 


CARDINAL) ; 
(* Draw a line of length n in direction d 
(angle = 45 * d degrees) *) 


CARDINAL; x, y, W, h : INTEGER); 

(* Paint the rectangular area at x, y of width w and 
height h in color c, where 0 = white, 1 = light gray, 
2 = dark gray, 3 = black *) 

(* Note: This proc is also called ‘area’ by Wirth *) 

dw, dh : INTEGER); 


dx, dy, 












(* Copy rectangular area at sx, sy into rectangle at dx, dy 


of width dw and height dh *) 


(* Clear the screen *) 


(* Note: Also places display in EGA 640 x 350 color mode *) 


CHAR) ; (* Write ch at pen’s position *) 


:- ARRAY OF CHAR); 


Listing Two 


IMPLEMENTATION MODULE LineDwg; 


(* 


(* 
(* 


Implements LineDrawing module defined by N. Wirth in *) 
“Programming in Modula-2." This module assumes EGA *) 


monitor in 640 x 350 color graphics mode. *) 
Uses virtual coordinates, where origin is at lower *) 
left corner of screen area, size is 800 x 600. *) 
Adapted by K. Porter for DDJ, April 1988 issue *) 


a a a a a a aw a a a a a a a a a a x) 


FROM SYSTEM IMPORT REGISTERS, 
FROM Strings IMPORT Length; 


INT; 


CONST VW = 800.0; (* virtual width of screen *) 
VH = 600.0; (* virtual height *) 
RW = 640.0; (* real device width, EGA screen *) 
RH = 350.0; (* device height *) 
EGA = 16; (* EGA 640 x 350 color mode *) 


(* Variables local to this module *) 


VAR reg : REGISTERS; 
xf, yf : REAL; 
color : INTEGER; 
(8 (ewe essen -—== LOCAL PROCEDURES ------------------------- =) 


PROCEDURE writePixel (c, x, y : INTEGER); 
(* write pixel of color c at device x, y *) 


BEGIN 

reg.AH := 12; 

CASE c OF (* map color indicator to EGA palette *) 
0 : reg.AL := 15| (* white *) 
1+ Beg.AL :=: 7 (* light gray *) 
2 : reg.AL := 8] (* dark gray *) 
.3 : reg.AL := 0 (* black: *) 

END; (2:68 CASE**) 

reg.BX := 0; 

reg.CX := x; 


reg.DX := y; 
INT (16, reg); 


color := cc; (* set prevailing color *) 


END writePixel; 


(* we ew wm wm wn ww oe ee x) 


End Listing One 
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PROCEDURE devX (x : INTEGER) : INTEGER; 
(* translate x to device x *) 


BEGIN 

RETURN TRUNC (xf * FLOAT (x)); 
END devx; 
(* Ses ewe ee eee eww eww wes ewan *) 


PROCEDURE devY (y : INTEGER) : INTEGER; 
(* translate y to device y *) 


BEGIN 
RETURN TRUNC (RH - (yf * FLOAT (y))); 
END devyY; 
(* ------------------ VISIBLE PROCEDURES -------------------- *) 


PROCEDURE dot (c : CARDINAL; x, y : INTEGER); 
(* Place a dot of color c at coordinate x;y *) 
BEGIN 
writePixel (c, devxX (x), devY (y)); 


END dot; 
(* ew wee ee eee eee eee eee oo ew aes x) 


PROCEDURE line (d, n : CARDINAL); 


(* Draw a line of length n in direction d 
(angle = 45 * d degrees) *) 


VAR xdir, ydir : INTEGER; (* x and y directions given d *) 


distance : CARDINAL; 
BEGIN 

CASE d OF 
0 : xdir := 1; ydir := 0O| (* right *) 
1 xdir := 1; ydir := 1, 
2.3: udir <= O: ydir.:= 1} (* up *) 
3 xdir := -1; ydir := 1] 
4 xdir := -1; ydir := 0| (* left *) 
5 xdir := -1; ydir := -1| 
6 xdir := 0; ydir := -1| (* down *) 
7 : xdir := 1; ydir := -1 

END; (* of CASE *) 


FOR distance := 1 TO n DO 
Px := Px + xdir; 
Py := Py + ydir; 
dot (color, Px, Py); 
END; 
END line; 
(* eee em ew ew eww ew ew ew ew ew we we ee ee ee *) 
PROCEDURE paint (c : CARDINAL; x, y, w, h : INTEGER); 


(* advance the pen *) 


(* draw in prevailing color *) 


(* Paint the rectangular area at x, y of width w and 
height h in color c, where 0 = white, 
1 = light gray, 2 = dark gray, 3 = black *) 


VAR cy, prevY, dy : INTEGER; 


BEGIN 
prevY := 0; 
color := c; 
FOR cy := y TO yth DO 
dy := devY (cy); 
IF dy <> prevY THEN 
PX s™)xX2 Py := cys 
line (0, w); 
prevY := dy; 
END 
END 
END paint; 


(* set new prevailing color *) 
(* get current device y *) 


(* if new scan line, draw *) 


(* remember where last line drawn *) 


PROCEDURE copyArea (Sx, sy, dx, dy, dw, dh : INTEGER); 


(* Copy rectangular area at sx, sy into rectangle 
at dx, dy of width dw and height dh *) 


VAR- Gy: Ke Ve 2E%e ‘L¥e DS, BY. OR,. ty: INTEGER? 


BEGIN 
ix := devX (sx); iy := devY (sy); (* source dev coords *) 
nx := devX (sx+dw); ny := devY (sy+dh); (* ending coords *) 
tx := devxX (dx); ty := devy (dy); (* target coords *) 


FOR y := ny TO iy DO (* go top to bottom *) 
FOR x := ix TO nx DO 
reg.AH := 13; 


reg.BX := 0; 


(* read pixel *) 


(continued on next page) 
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NANCY 
GRAHAM'S 
RAMBENDERS 


Nancy Graham, recognized nationally for 
her high-precision watercolors of classic 
cars, is creating a series of original paint- 
ings which explore the interplay of the 
power of the 50's. . . cars, and the power 
of the 80's. . . computers. Superb quality 
color reproductions of the first two paint- 
ings in this series, Power User, for IBM PC 





Polishing The Apple 


enthusiasts and Polishing the Apple for 
Macintosh enthusiasts, are available now. 


These illusionary images are reproduced 
for the first time on 100 Ib. 15” x 19” 
acid free book weight coated paper with 
fade resistant inks to insure precise 
reproduction of the original watercolors. 
Each reproduction is signed by the artist. 


The price of these exact reproductions is 
just $30 each or both for $50. These in- 
troductory prices include shipment via 
UPS Blue Label (2-day delivery) and an 
unconditional 30-day guarantee. 


Power User 


Order yours from RamBenders, 11100 
Leafwood Lane, Austin, Texas, 78750-3409, 
(512) 258-0785. 


acw!rambenders@uunet.uu.net 


Mastercard/Visa accepted. 





© RamBenders, 1988 
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| Now you can use QPARSER+ to develop com- | 
| pilers, interpreters, complex user-interfaces, language | 
| & file format translators (i.e. Pascal to C, Bit Map| 
to Postscript), language debuggers like lint, etc. | 
| 


Develop language translators in C and Pascal 
iwithin the IBM PC/XT/AT or VAX/VMS environments. 
1A new user manual, automated syntax tree con- 
| struction and an advanced code generation language 
| are just a few of the improvements over the original | 
| QPARSER. c | 


Ce 








1 Another translation by QPARSER: | 
: eofes — FREE demo disk available 


i 
1 yimited 00 
E gust $3 ' 
QCAD Systems 
1164 Hyde Avenue, San Jose CA 95129 (408) 727-6884 
_ Outside Calif, call TOLL-FREE (800) 538-9787, 
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EQUATIONS 
A* = lim Df (ce) Ax 


Fo _ Fy. 
ax? axdy 


-b+Vb?-4ac 


2a 
GRAPHS/PLOTS 


8 


aaa AORTA 
LaserJet, Imagen, Laserwriter, and 
all PostScriPT® printers! 


Our enhanced 
troff allows 
inclusion of 
graphics directly 
into your 
documents. 

_ Available on 
MS-DOS and 36 
different UNIX 
systems. 


CRT screen 
previewers for 
rough drafting 
are now included 
with EROFF.” 


6 
Number 


10 15 
Population (in Millions) of 15 States 


Full graphics 
previewers for 
SUN and 
X-Windows are 
also available. 


Rye bread 9.0 


Elan Computer Group, Inc. 
410 Cambridge Ave., Suite A, Palo Alto, CA 94306 
415.322.2450 
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Listing Two 
(Listing continued, text begins on page 118.) 


reg.Cx 
reg.DX := y; 

INT (16, reg); 

reg.AH := 12; 

reqd.CX := tx + x = ix; 
-DX := ty + y - iy; 
(16, reg); 


= ae 


(* get pixel color into al *) 
(* write pixel to dest *) 


PROCEDURE clear; 2 (* Clear the screen *) 
(* Also places display into EGA graphics mode 





BEGIN 
reg.AH := 0; 
reg.AL := EGA; 
INT (16, reg); 
color := 0; 

END clear; 


(* EGA 640 x 350 *) 


(* reset default color to white *) 


PROCEDURE Write (ch : (* Write ch at pen’s position *) 


VAR cc, cr : INTEGER; (* Char col and row *) 















BEGIN 
cc := devX (Px) DIV 8; 
cr := devY (Py) DIV 14; 
reg.AH := 2; 
reg.BX := 0; 
reg.DX := (cr * 256) + cc; 
INT (16, reg); 
reg.AX := 2560 + ORD (ch); 
reg.BX := 7; 
reg.CX := 1; 
INT (16, reg); 
Px := Px + CharWidth; 
END Write; 


(* Derive char pos from pen *) 


(* Set text cursor position *) 


(* Write char via ROM BIOS *) 
(* Light gray text only *) 


(* advance by char virtual width *) 







PROCEDURE WriteString (s : ARRAY OF CHAR); 










VAR i : CARDINAL; 


BEGIN 
FOR i := 0 TO Length (s) DO 
Write (s[i]); 


END 
END WriteString; 











TRUNC (VW / 2.0); (* Virtual screen center *) 


Py := TRUNC (VH / 2.0); 

mode := replace; 

width := TRUNC (VW); (* Virtual screen size *) 
height := TRUNC (VH); 

CharWidth := 10; (* Char sizes in virtual units *) 
CharHeight := 24; 

xf := RW / VW (* x translation factor *) 
yf := RH / VH (* y translation factor *) 
color = 0; (* white is default color *) 


END LineDwg. 


End Listing Two 






Listing Three 


MODULE Sierpin; 








(* Based on the Sierpinski recursive model in N. Wirth’s book *) 


(* “Programming in Modula-2." x) 
(* Wirth’s program has been modified slightly to accommodate *) 
(* EGA graphics mode on the IBM PC. *) 







(* Written by K. Porter for DDJ, April 1988 issue. 


= 





FROM InOut IMPORT Read; 
FROM LineDwg IMPORT width, height, Px, Py, clear, line; 
FROM SYSTEM IMPORT REGISTERS, INT; . 
(continued on page 92) 
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horizontal scrolling. Clean sc 
fields per screen limited only by 
development. String fields. Easy to 
painting. Bind as much data as de 
- data entry with commas. A: 
gramming library. Hexadecim 
ot No fields. Float fields. Quic 
Speaker functions. Lattice 
UNIX. Numeric validat ne 
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C-scape 2.0 


with 


Rok& feel 


The state-of-the-art interface management 
system preferred by professional C 


programmers and consultants worldwide. 


f logical colors. Tollfree: t 

i. Screen and field definitio 
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e WYSIWYG screen design tool 

e Generates readable C code 

e¢ Create menus and data entry 
screens 

© Define fields of any type 

e Variables, prompts, and validation 

e Line draw and erase 

e Block, move, cut, paste, copy 

e Horizontal and vertical scrolling 

e Edit Dan Bricklin Demo slides 

e Full color support 

e Fast, easy, and fun to use 

e Includes help 

e Full-feature demo available 


functions. Device drivers swappable at run-time. Context sensi t 


done from disk files. Digitally mastered. Acca: prompt strit 
‘ime license. Numeric range checking. Unified field theor 


OAKIAND 


675 Massachusetts Avenue, Cambridge, MA 02139-3309 


800-233-3733 CALL 


617-491-7311 


PC/MS-DOS $299 (price includes C-scape, Look & Feel, source 
and manual). UNIX/others call. 30-day review. 
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C-scape 2.0 


e Windows, windows, windows 
e Menus, menus, menus 

e Vast help system 

e Create any type of field 

e Data entry and validation 

e Smart borders 

e Extensive function library 

e Swappable device drivers 

e Easy to learn and use 

e Easy to maintain and modify 
e Unsurpassed flexibility 

e Professional manual 

e No royalties; no run-time license 
e Source code included 

e Demo package available 


a Nested menus. Quick C. Create screens aay ASCII files. Ea 
and use. Horizontal and vertical scrolling. Used by consultants and corp 


worldwide. Easy to maintain. Professional documentation. Screen desigr 


ble C code. Portable. Easily modifiable functions. No royalties. Source code included. Apollo and Data General. isoniee su 


amples for data base management. Validation at keystroke level. Vast integrated and indexed con 


gions of the display. Now. supporting et Turbo C, Lattice icrosoft, UNIX, XENIX, at 
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C 
Pascal 





386 - 386 - 386 + 386 


Paradox 386 
Foxbase+ 386 | 
386-MATLAB,/Weitek 


... and others ... 


These and other protected-mode 32-bit 80386 programs are 
among the first to take advantage of the full power of the 386. 
They and practically every 386 protected-mode MS-DOS 
program that's shipping were done with MetaWare's compilers. 


It's no surprise. The recognized leader, MetaWare introduced the 
first C and Pascal compilers that generate protected-mode 386 
code for running on any 386 MS-DOS machine (e.g., the Compaq 
386 or the IBM PS/2-80) over a year ago. High C ™ and 
Professional Pascal ™ are well-established and proven. 


Smart software developers aren't waiting! \ndustry leaders such 
as Borland (ANSA) and Fox use MetaWare's compilers to get dra- 
matic increases in speed and functionality. Don't wait years for 
Microsoft's 386DO0S—your competition will have a big jump on you! 


Expand your application to the large 32-bit address space and the 
full 32-bit registers of the 80386. Go with the long-standing leader. 
Contact MetaWare for your 80386 software solution today! 


(408)429-6382 telex 493-0879 


Mets lsc 





INCORPORATED 


903 Pacific Avenue, Suite 201 * Santa Cruz, CA 95060 
The Clear Choice for Large Programming Projects —c tech Ji 


* 986 * Dow - OBE * OBE > OBE + OBE > OBE > OBE + OBE + OBE » OBE > OBE ° 
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98E + 98E * OBE + OBE > OBE * OBE * OBE + OBE + OBE * OBE > OBE * OBE + OBE » OBE > OBE * OBE * OBE 


386 + 386 + 386 + 386 - 386 + 386 - 386 - 386 - 386 - 386 + 386 - 386 - 386 


Conquer Time 
and Space. 


Introducing XO-SHELL. 


Pop-Up Productivity for Programmers. 


No matter what language you program in, XO-SHELL will help 
you hurdle the barriers to working faster and more efficiently 
by eliminating programming hassles. Only with RAM-resident 
XO-SHELL can you: 

DO CROSS-REFERENCING without leaving your editor 

VIEW ANY FILE and TRANSFER ANY SECTION into your 

editor or to your printer 

VIEW, COPY and ERASE files directly from a SCROLLABLE 

DIRECTORY DISPLAY 


With a single key stroke RETRIEVE previous DOS commands, 
then EDIT and REEXECUTE them 


DO SOURCE-LISTING while in your application 


OBTAIN KEY-CODES without a reference and without going 
through difficult interpretation 


INSERT GRAPHICS CHARACTERS in your source code. 
XO-SHELL is for PCs, XTs, ATs, PS/2s, compatibles. 


NN. 


LUVIE 


WYTE CORPORATION 
701 Concord Avenue 
Cambridge, MA 02138 


$ 


plus $5 shipping & handling 
Call today toll-free 


(800) 635-5011 


In MA: (617) 868-7704 
Visa, MasterCard 
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“PROGRAMMING 


Listing Three 
(Listing continued, text begins on page 118.) 


CONST SquareSize = 512; 


VAR: 2i,ch, x0, yO : CARDINAL; 
ch : CHAR; 
reg : REGISTERS; 
PROCEDURE A (k : CARDINAL); 
BEGIN 
IF k > 0 THEN 
A (k-1); line (7, h); B (k-1); line (0, 2*h); 
D (k-1); ‘line (1, h); A (k-1) 
END 
END A; 
(* eee ew ew ew ew ww ww ww ww ww we we ew ee *) 
PROCEDURE B (k : CARDINAL); 
BEGIN 
IF k > 0 THEN 
B (k-1); dive: (5... hy? C (k-1); line (6, 2*h); 
A (k-1); line (7, h); B (k-1) 
END 
END B; 
(* Seen ee ee eee eee eee eww oeewwowwow es *) 
PROCEDURE C (k : CARDINAL); 
BEGIN 
IF k > O THEN 
C:'(k~1)-» line (3, h); D (k-1); line (4, 2*h); 
B (k-1); line (5, h); C (k-1) 
END 
END C; 
(* eee eee ew ew em em we mew wee ewww ewww owe *) 
PROCEDURE D (k : CARDINAL); 
BEGIN 
IF k > 0 THEN 
D (k-1); line (1, h); A (k-1); line (2, 2*h); 
C (k-1); Tine (3, h)< D (k-1) 
END 
END D 
(* eee *) 
BEGIN 
clear; 
1 sam: 
h := SquareSize DIV 4; 
x0 := CARDINAL (width) DIV 2; 
yO := CARDINAL (height) DIV 2 + h; 
REPEAT 
a sae Lb 
x0 := x0 - h; 
ni. . = KheBEV. 2s 
y0°.s= yO" ct h> 
Px := x0; 
Py rey 
A (i); Live. 2. “hks B (i); line (5, h); 
CL) line (3, h); D< (i); line (1, h); 
UNTIL (i = 4); 
Read (ch); (* hold for keypress *) 
reg.AH := 0; 


reg.AL := 3; (* restore 


INT °(16, .xreg) ; 
END Sierpin. 


Listing Four 
MODULE MathPlot; 


(* Graphs the function y = cos x + 
(* K. Porter, DDJ, April 88 


80 x 25 color text mode *) 


End Listing Three 


sin 2x using LineDwg *) 
*) 


FROM MathLib0O IMPORT sin, cos, real, entier; 
FROM LineDwg IMPORT line, dot, clear, WriteString, Px, Py; 


FROM InOut IMPORT Read; 


FROM SYSTEM IMPORT REGISTERS, INT; 
VARS x, 625.8; .. ¥- 2° “REALE: 

xc : INTEGER; 

ch : CHAR; 

reg : REGISTERS; 
PROCEDURE yc (y : REAL) : INTEGER; 


BEGIN 
RETURN entier (y * 100.0) + 300; 
END yc; 
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BEGIN 
clear; 
Px := 0; Py := 300; line (0, 800); 
Px := 0; Py := ye (1.0); 


WriteString (" 
dot. (2, “bx, Ey) > 
line (0, 750); 
Px ':= 0; Py := yo: (-1.6); 
WriteString (" -1"); line (0, 750); 
FOR xc := 125 TO 799 BY 126 DO 


Ls 


(* x axis *) 
(* grids *) 


(* set dark gray *) 


(* vertical grids *) 


Px := xc; Py := ye (2.0); line (6, 400); 


END; 
Px = 310; Py :=\539; 
WriteString ("y = cos x + sin 2x "); 


FOR xc := 1 TO 799 DO 
x := real (xc) / 80.0; 
sx := sin (2.0 * x); 
Got (2; x6, ve. (sx) )}s 
cx, += cos: (x): 
dot (1, xc, ye 
y = sx + Cx; 
dot ' (G0, -xc, ye 

END; 

Read (ch); 

reg.AH := 0; 

END MathPlot. 


(cx) ); 


(y))>; 


reg.AL := 3; 


Listing Five 


MODULE Spiral; 


INT (16, reg) 


(* x to radians -*) 


(* plot sine in dark gray *) 
(* cos in light gray *) 


(* plot function in white *) 


(* text mode *) 


End Listing Four 


(* Draws a spiral, then copies part of it to a window *) 


FROM SYSTEM IMPORT REGISTERS, INT; 


FROM LineDwg IMPORT Px, Py, line, copyArea, WriteString, clear; 


FROM InOut IMPORT Read; 
VAR reg : REGISTERS; 
ch : CHAR; 

n, Gd : INTEGER; 


BEGIN 

clear; 

Px := 250; 

FOR n := 0 TO 24 DO 
ad := n MOD 8; 
line (d, n * 5); 

END; 

Px := 548; Py 

line (0, 204); 

line (2, 204); 

line (4, 204); 

line (6, 204); 

Px := 630; Py := 440; 

WriteString ("Copy "); 


s= 198; 


copyArea (200, 200, 550, 200, 200, 200); 
Read (ch); 
reg.AH := 0; reg.AL := 3; INT (16, reg); 


END Spiral. 
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(* Draw the spiral *) 


(* Outline the copy window *) 


(* Copy portion *) 


(* Wait for keypress *) 


End Listings 





VTEK™ 


DEC® VT100/VT52 
and Tektronix® 
4010, 4014, & 4105 
Terminal Emulator 


*20 user-defined keys 
‘large scroll back buffer 
ehardware 132 columns 
“Kermit and XMODEM 
eup to 800x600 screen 
resolution on EGAs 
*zoom, pan, window plots 
*“hot key” to DOS 

eall VT100 keys, long and 
short breaks 

*ANSII extensions to 
VT100 for multi-color text 
«scrolling VT100 window 
on graphics screen 
econvert files to .GEM & 
.PIC formats 


$150. Site and source 
code licenses available 


Graphil” 
Publication 
quality graphics 
on your IBM® PC 























‘linear, log, polar plots 
ebar charts, Smith charts 
*3D curves, 3D surfaces 
*6 curve types, 8 markers 
thick lines, panel fills 
°15 fonts, font editor 
*4096 x 3120 resolution 
*Z00om, pan, window plots 
ehigh resolution printer & 
plotter dumps in color 





Over 150 C and assembler ™ 
routines for full control B -E D / a: 
$395 with source code. Our new binary editor 
For personal use only. for programmers - $29 


MOST HARDWARE IS SUPPORTED 
Scientifie Endeavors Ci orporation 








Route 4, Box 79 Kingston, TN 37763 (615) 376-4146 
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SERIES 32000 MODULA-2 COMPILER 


Program development system for Series 32000 based embedded systems running on IBM-PC/XT/AT and PS/2-30 








Description: 


- Add-in board consisting of Series 32000 chip set and ROM-resident 
EDITOR, COMPILER, LINKER, DECODER and MAKE UTILITY 


2 
PROCEDURE WriteString (string: ARRAY OF CHAR); 
CARDINAL; 


ELSIF stringlt} # Bsc THES Host Hardware: 


Write(stringli 
mci) 
- IBM PC/XT/AT or compatible with free half card slot 


Host Software: 
- DOS 2.0 or later 


Target Hardware: 


- Any Series 32000 based embedded system 


Target Software: 


Symtax error 


illegal character in number 


- Runtime support is supplied in source form 


Lor Key Product Features: 
IF i > HIGH string) THEN 


String{i] § @@xC ¢THEN 


ASIF stringl} - This compiler enables you to use all the features of Modula-2 as described 
ae i)); 


in Nicklaus Wirth's Programming in Modula-2 (3rd edition). 


EXIT 
: - The target runtime support module, supplied in source form, includes a 
floating point package which emulates the NS32081 chip, if necessary. 


— Compilation process --- errors detected 
Gompile systes.scd 


- The system's command-line-based user interface is on-screen supported 


and leads the user through the command entering process. 
- The information display makes constant reference to a manual unnecessary 
by providing the user with the information needed to run the system. 


- Only a single command line is needed to convert a set of source modules 
into an executable file. 


- Any individual application can consist of up to 400 modules written 
entirely in Modula-2. 


Key Product Benefits: 


— link file GpplicationName>.OBJ or <ApplicaticnNese>.O@ 
link Monitor.) codestart @ Gatastart S8008@H stacksize 48888 mminrae 


- Manual-free use 


- Programs can be written entirely in Modula-2 





- Easy handling of very large program packages 


- Convenient transfer of Modula-2 programs written for other processors to 
Series 32000 environment 


- Reasonably priced development system for the entire family of Series 
32000 microprocessors 


Product Vendor: 


Alois Schénbiachler, Freischiitzgasse 14, CH-8004 Ziirich/Switzerland 





Tel.: 41-1-241-0514 





Series 32000 is a registered trademark of National Semiconductor Corporation. 
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e e ° 
Listing One (Text begins on page 130.) 
SCR# 0 
( Corrected source screens) The following four screens contain 
corrected source for the operators GETDATA PUTDATA and PUTTEXT. 


The original uncorrected versions are in the DDJ Forth column, Feb 
1988. 


Screen 5 defines GETDATA using 


BEGIN... DUP IF DROP ... THEN WHILE ... REPEAT 
instead of the preferred 

BEGIN ... WHILE ... WHILE ... REPEAT THEN 

SCR# 1 


\ Read BLOCKed file as data file 


: GETDATA ( an — n2) 
\ reads n bytes of data from input file into address, n < 64K 
\ Returns n2 bytes not read ( ie beyond end of file ). 
( calculate # of bytes to move < 64K : ) POSITION 2@ 
BEGIN 2 PICK ( n ) DUP 
IF ( n ) >R 2DUP 1K UM/MOD SWAP DROP 1+ 1K UM* 
CAPACITY 2@ DMIN 2OVER D- 0= NOT OR’ R> UMIN 
THEN ?DUP 
WHILE >R 2DUP 1K UM/MOD BLOCK + 4 PICK R@ CMOVE 
R@ 0 D+ 2SWAP R> /STRING 2SWAP 
REPEAT POSITION 2! SWAP DROP ; 


SCR# 2 


\ Write BLOCKed file as data file 


: PUTDATA ( a n) 
\ writes n bytes of data to output file from address, n < 64K 
( extend the file as needed : ) 
- DUP 0 POSITION 2@ D+ CAPACITY 2@ 20VER D- DUP O0< 
IF 2DUP DABS EXTEND 20OVER CAPACITY 2! THEN 2DROP 2DROP 
( calculate # of bytes to move < 64K : ) POSITION 2@ 
BEGIN 2 PICK (nn) DUP 
IF (nn) >R 2DUP 1K UM/MOD SWAP DROP 1+ 1K UM* 
CAPACITY 2@ DMIN 2OVER D- 0= NOT OR’ R> UMIN 
THEN 2DUP 
WHILE >R 2DUP 1K UM/MOD BLOCK + 4 PICK SWAP R@ CMOVE 
R@ 0 D+ 2SWAP R> /STRING 2SWAP UPDATE 
REPEAT POSITION 2! 2DROP ; 


SCR# 3 
\ Read text file with #EOF 


\ reads n bytes of text from input file into address, n < 64K 


0 

1 

2 : GETTEXT ( an - n2 f) POSITION 2@ OE a) a 

3 

4 \ Returns n2 bytes not read ( ie end-of-line or beyond file) 





function libraries 






for Version Control 


WG PC Tech Journal says... 
TLIB™ is 
FASTEST! 


Times are for updat- 
ing a 45K library on a 
PC/XT. All benchmark 
results except TLIB 4.0 
are from Sept 87 PC 
Tech Journal review. 


= 0:09 
SAMS PVCS TLIB3.0 TLIB 4.0 


disassemblers 


compilers 





text editors 





emits) 
communications support 


i) 4m felduar- late 





interpreters 






bulletin boards 






co-routines 







compiler compilers 







window packages 











tutorials 


“...packed with features... excellent...” Jim pees 
Vallino, PC Tech Journal Sept 87 


“..has my highest recommendation.” Ronny 
Richardson, Computer Shopper Aug 87 
MS-DOS 2.x & 3.x Just $99.95 + $3 s/h Visa/MC 


BURTON SYSTEMS SOFTWARE 
P. O. Box 4156, Cary, NC 27519 
(919) 469-3068 


link editors 






languages 






foi fece meen e | -16s 






pre-processors 






function libraries 






felis T x laale) 16) 






compilers 






i ed eli cele 
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5 
6 
% 
8 


9 
10 
it 
12 
pA 
14 
15 


SCR 


own no nr WN FEF © 


nw 
a th 


wma nNUPW Nr OO 


PRPRPPPPH 
Of WN FP OO 


Users’ Group 
Library 


\ 


# 


=~ 


OO A ee 


OO A th 


A Directory 
at a of Public Domain 
games C Source Code 


TheC Users . 
PO Box 67460 


McPhers 
(316) 





n, KS 
71-1085 





Returns true if #EOL terminates line; false otherwise. 
BEGIN 2DUP CAPACITY 2@ D< 3 PICK (nn) AND 
WHILE 2DUP 1K UM/MOD BLOCK + C@ ( get ch) 
DUP #EOL = DUP R> OR OR 
OVER #EOF = OR NOT AND ?DUP 
WHILE >R 10 D+ 2SWAP R> 2 PICK C! 1 /STRING 2SWAP 
REPEAT THEN 2DUP CAPACITY 2@ D< 
IF 2DUP 1K UM/MOD BLOCK + C@ #EOL = DUP D- THEN 
2DUP CAPACITY 2@ D< 
IF 2DUP 1K UM/MOD BLOCK + C@ #LF = DUP D- THEN 
POSITION 2! SWAP DROP R> >; 


4 
Read text file without #EOF 


GETTEXT ( an - n2 f) POSITION 2@ G.-¢ :)~ SR 
reads n bytes of text from input file into address, n < 64K 
Returns n2 bytes not read ( ie end-of-line or beyond file) 
Returns true if #EOL terminates line; false otherwise. 
BEGIN 2DUP CAPACITY 2@ D< 3 PICK (nn) AND 
WHILE 2DUP 1K UM/MOD BLOCK + C@ ( get ch) 
DUP #EOL = DUP R> OR OR 
NOT AND ?DUP 
WHILE >R 10 D+ 2SWAP R> 2 PICK C! 1 /STRING 2SWAP 
REPEAT THEN 2DUP CAPACITY 2@ D< 
IF 2DUP 1K UM/MOD BLOCK + C@ #EOL = DUP D- THEN 
2DUP CAPACITY 2@ D< 
IF 2DUP 1K UM/MOD BLOCK + C@ #LF = DUP D- THEN 
POSITION 2! SWAP DROP R> ; 


5 
Read text file with #EOF 


GETTEXT ( an - n2 £f) POSITION 2@ oS G- tn 
reads n bytes of text from input file into address, n < 64K 
Returns n2 bytes not read ( ie end-of-line or beyond file) 
Returns true if #EOL terminates line; false otherwise. 
BEGIN 2DUP CAPACITY 2@ D< 3 PICK (nn ) AND 
DUP IF DROP 2DUP 1K UM/MOD BLOCK + C@ ( get ch) 
DUP #EOL = DUP R> OR OR 
OVER #EOF = OR NOT AND 2?DUP THEN 
WHILE >R 10 D+ 2SWAP R> 2 PICK C! 1 /STRING 2SWAP 
REPEAT THEN 2DUP CAPACITY 2@ D< 
IF 2DUP 1K UM/MOD BLOCK + C@ #EOL = DUP D- THEN 


2DUP CAPACITY 2@ D< 
IF 2DUP 1K UM/MOD BLOCK + C@ #LF = DUP D- THEN 
POSITION 2! SWAP DROP R> ; 


End Listing 


GRAPHICS TOOLKIT 


COMPATIBLE WITH 


PC/XT/AT AND NEW PS/2 


LIMITED INTRODUCTORY 
$53. 35 OFFER CADD $3 S/H) 


SUPPORTS NEW VGA GRAPHICS MODES 
5@+ FUNCTIONS 

BUFFER & DISK SAVE/RESTORE 

FREE LISTING UTILITY 

DATA COMPRESSION ALGORITHM 


ALL SOURCE CODE INCLUDED 
ROUTINES WRITTEN IN MICROSOFT C 
AND ASSEMBLER 

NO ROYALTIES 

PROGRAMMER SUPPORT PROVIDED 


DEVTRONICS, INC. 
1571 MAIN STREET 


ATLANTIC BEACH FLA. 32235 


ORDERS ONLY: 1-8@8-352-4235@ AMEX/COD 
TECHNICAL INGUIRIES: (904) 241-3281 
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C CODE FOR THE PC 
source code, of course — 
C Source Code 


Bluestreak Plus Communications (two ports, pro 
CQL Query System (SQL et stue itecloneay ree eee oe ae 
GraphiC 4.1 (high-resolution, DISSPLA-style scientific plots in color & hardcopy) PS aie 
Barcode Generator (specify Code 39 (alphanumeric), Interleaved 2 of 5 (numeric), or UPC) $30 
oe eee pe (windows, menus, data entry, interactive form design) Sak 
n Softw fe 
a et a. Windorey asses : compatible, eeeere ss ACCUEIER ENON) - ie ep oet i Ee $250 
Essential resident C (TSRify C programs, DOS shared libraries) Pea ia Ae oa 
atte : Utility Library (400 useful C functions)... . . s-seb le a 
ssential Communications Library (C functions for RS-232-based communication systems) . 
Greenleaf Communications Libessy eae mode, $-282-b oad eomapeanlention syitet : 2 
Greenleaf Functions (296 useful C functions, all DOS services) ; ice 
OS/88 (Us#x-like O/S, many tools, cross-development from MS-DOS) .. . . ied 
Turbo G Graphics Library (all popular adapters, hidden line mal sos igs 
American Software Resident-C (TSRify C programs) . ea 
CBTree (B+tree ISAM driver, multiple variable-length keys) . oe 
PC/IP (CMU/MIT TCP/IP implementation tor POs)... a 
B-Tree Library & ISAM Driver (file system utilities by Softfocus) . hes 
The Profiler (program execution profile tool) . Ti 
Entelekon C Function Library (screen, graphics, keyboard, string, printer, “ete. ) pe $100 
Entelekon Power Windows (menus, overlays, messages, alarms, file handling, etc. ) | $100 
Wendin O/S Construction Kit or PCNX, PCVMS O/S Shells . as $95 
QC88 C Compiler (ASM output, small model, no longs, floats or bit fields, 80-+ function librar ) . $90 
JATE Async Terminal Emulator (includes file transfer and menu subsystem) — : $80 
MultiDOS Plus (DOS-based multitasking, intertask messaging, semaphores) is $80 
ME (programmer’s editor with C-like macro language by Magma Software) $75 
WKS Library (C program interface to Lotus 1-2-3 program & oe) $65 
Quincy (interactive C interpreter) . . cy $60 
EZ_ASM (assembly language macros bridging Cand d MASM) yal $60 
PTree (parse tree management) : $ 
HELP (pop-up help system builder) . . . ee 
Multi-User BBS (chat, mail, menus, sysop displays; uses s Galacticomm modem card) . $50 
Heap Expander (dynamic memory manager for expanded memory) $50 
Make (macros, all languages, built-in rules) . $50 
Vector-to-Raster Conversion (stroke letters & Tektronix 4010 codes to bitmaps) $50 
Coder’s Prolog (inference engine for use with C programs) $45 
C-Help (pop-up help for C programmers ... add your own notes) $40 
Biggerstaff’s System Tools (multi-tasking window manager kit) . $40 
CLIPS (rule-based expert system generator, Version 4.0) . . $35 
TELE Kernel (Ken Berry’s multi-tasking kernel) $30 
TELE Windows (Ken Berry’s window package) . . . ; $30 
Clisp (Lisp interpreter with extensive internals documentation) $30 
Translate Rules to C (YACC-like function generator for rule-based systems) $30 
6-Pack of Editors (six public domain editors for use, study & hacking) . . $30 
ICON (string and list processing bammnone, Version 6 and rs ee $25 
LEX (lexical analyzer generator) ; $25 
Bison & PREP (YACC workalike parser generator & attribute epannar r preprocessor) ; $25 
AutoTrace (program tracer and memory trasher catcher) ae $25 
C Compiler Torture Test (checks a C compiler against K & R) $20 
Benchmark Package (C compiler, PC hardware, and Unix system) . $20 
TN3270 (remote login to IBM ee as a 3270 terminal on a 3274 controller) $20 
A68 (68000 cross-assembler) a eis Se ES tan og $20 
List-Pac (C functions for lists, stacks, and queues) a $20 
XLT Macro Processor (general purpose text translator) $20 
Data 
WordCruncher (text retrieval & document analysis program) . $275 
DNA Sequences (GenBank 52.0 including fast similarity weseak aes! $150 
Protein Sequences (5,415 sequences, 1,302,966 residuals, with similarity search program) . $60 
Webster’s Second Dictionary (234,932 ‘words) a) OO 
U. S. Cities (names & longitude/latitude of 32,000 U.S. cities and 6 000 state boundary points) ae $35 
The World Digitized (100,000 longitude /latitude of world country boundaries) $30 
KST Fonts (13,200 characters in 139 mixed fonts: specify T&X or bitmap format) . $30 
USNO Floppy Almanac (high-precision moon, sun, planet & star pemiren ; $20 
NBS Hershey Fonts (1, 377 stroke characters in 14 font) Bit iy a dw itedag | eat ae 
U. S. Map (15,701 points of state boundaries) . . --- +--+ ee eee tes $15 
The Austin Code Works Voice: 2 (512) 2 258-0785 
11100 Leafwood Lane acwlinfoQuunet.uu.net BBS: (512) 258-8831 
Austin, Tezas 78750-3409 USA FidoNet: 1:3882/12 
Free shipping on prepaid orders For delivery in Texas add 7% MasterCard/VISA 
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MICROSOFT, TURBO AND MIX POWER C PROGRAMMERS. .. 
C WINDOWS TOOLKIT PUTS YOU IN CHARGE OF VIDEO! 


C Windows Toolkit is the only C programmer’s windowing package 
that comes with a complete tutorial on monochrome, Hercules, 
CGA and EGA video. We don't just provide the functions, we also 
explain how to use them reliably. 

And C Windows Toolkit comes with full, commented source code 
(would you trust a package that didn’t?). 


WINDOWING EGA/VGA SUPPORT 
FUNCTIONS © Use all 64 EGA colors 


° Use EGA 43-line mode 
(reais peep vaNdows ¢ Use 2 fonts simultaneously 
* Create pull-down menus © Design custom fonts 
* Create spreadsheet menus « Smoot: deri ie eceaaie 
° Create context-sensitive help screens ¢ Smooth pan the screen 
¢ Store windows for recall later 


° Free memory used by windows FAST SCREEN I/O 


¢ Use 8 different types of exploding windows 
= ee * Write to the screen lightning fast 


SYSTEM SUPPORT © Write formatted output (like printf ) ) 


© Detect how many video adaptors are present * Get snow-free output on the CGA 


: e Scroll the screen 
e Detect the types of video adaptor installed . 
© Switch between adaptors Read characters off the screen 








COMPLETE DEVELOPMENT SYSTEM 


= Based on proven Oregon Software technology 
= Conforms to Programming in Modula-2 
(2nd & 3rd editions) 
@ Includes extensions 
= Backed by responsive support engineers 


| HIGHLY OPTIMIZING 


@ Object code is compact and fast 





















* Detect ANSI.SYS 
= Ideal for large programs * Control pete on of the cursor HERCULES SUPFORT SUFFORT 
icti i i e h Db e . 
= Sophisticated error checking and reporting . Disable the video signal. oh ¢ Detect Ramfont support 
* Delay program execution to microsecond * Load a Ramfont 
resolution * Switch between modes 






Over 80 functions that enhance your productivity. 
Full source code included — No run-time royalties 
Includes 200 page manual — 30-Day Money-Back Guarantee 





/ YES! | want top performance 
=! atan affordable price 
To order, or for more information, call 1-800-874-8501 
6915 SW MACADAM, SUITE 200, PORTLAND, OR 97219 


OREGON 


Professional Products for Software Development 






Magna . 
OFT ef ees 
Se AWA oe 


Requires: IBM PC, XT, AT, PS/2 or compatible that will run 
Microsoft C and/or Quick C 
Supports Microsoft C 4.0/5.0/Quick C, Borland Turbo © 1.0/1.5, 
Mix Power C 
From: Magna Carta Software & 
P.O. Box 475594 : 
Garland, TX 75047-5594 se Only $99.95 
SRR 


(214) 226-6909 (Texas residents add 8% sales tax) 
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PROGRAMMERS! 
THE TOOLS YOU NEED 
AT A PRICE YOU’LL LIKE 


ae 
BENGE supports all index file operations. Very quick 


sequential or random access, duplicate keys, multiple 75.00 NOW 


indices, fixed and variable length data records are all supported. 
MULTI 


Works on top of BTree to provide a simple, yet -USER 
powerful application program/file system interface. 40.00 AVAILABLE 
Complex filesystem manipulation becomes a snap. Provides the power 


of a database manager with the flexibility of a programming language. 60.00 


Finally, a completely device independent printer library! 
lp drives any printer as accurately as possible and allows easy access to 75.00 
its most sophisticated features. Multiple fonts, multi-column output, complex margin 
formatting, and much more. Pays for itself the first time it’s used. 


The ultimate ‘make’ utility. We couldn’t find a good one, so 
we wrote a great one. Has all kinds of powerful features including wild 59.00 
card filename expansion, nested macros, and multiple dependency and rules defini- 
tions. Ready to go for MS-DOS; C source is there if you use another operating 
system. 


Combine & Save: BTree + ISAM + Ip 159.00+ snake 199.00 


Each product includes a typeset manual, example programs, and complete C source Un Stanbury Drive 
code that runs on any operating system. Softfocus products may be incorporated into Or mela aor Oz LiL teL-| 
applications royalty-free. L6L 2J5 


Credit card orders accepted. Visa, M/C, Amex. Dealer inquiries invited. (416) 825-0903 
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The $19.95 High-Performance C Compiler 


M ix Software presents Power C . . . Our new cost- 
efficient alternative to high-priced C compilers. 
Now you can create high-performance programs 
without spending all your hard-earned money. But 
price isn’t the only reason to choose Power C over 
the competition. 


Compare the performance. Power C’s integrated 
Make saves you time and effort by automatically 
managing your large programming projects. And 
with Power C, your programs can be as large as 
available memory. As for speed, the performance 
chart speaks for itself. Power C executes most of 
the benchmarks faster. And Power C ‘creates 
smaller EXE files, out-performing the competition. 





Performance Chart 
(execution times in seconds) 


| Power C] MSC | Turbo C _ 
‘fs | 238 | azo | 264 
jaysiever | 276 | 402 | 255 | 
jor | 35 | ao | a6 
adiskion | 135 | a2] a3 
Ls)repon | 110 | 863 | 607 
6) drystone™ | 366 | sa2| 318 
[Compitetink | 739 | se76| 614 


EXE File Size | 25120 29008; 27184 


Benchmarks from Dr. Dobb’s Journal* & Computer 
Language™. First four programs test 1) function calling, 2) 
loops/integer math 3) floating point math, & 4) disk I/O. Pro- 
grams 5 & 6 simulate typical applications. Tests compiled 
from command line using Make supplied with each com- 
piler. Tests run on 8 MHz AT with medium model of Power 
C 1.0, MS (Microsoft) C 4.0, & Turbo C 1.0. 
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Compare the functions. With over 400 functions, 
the Power C library is vastly superior. Our library 
is a Superset of Microsoft C and Turbo C. Plus, 
we've added an extensive set of graphics functions 
for drawing lines, boxes circles, pie charts, 
and more. 


Compare the portability. Power C supports the 
latest features of the proposed ANSI C standard. 
Plus, Power C is compatible with both Microsoft 
C and Turbo C. All of which makes it easier to 
move programs to and from Power C. 


Con ipare the documentation. Our competition 
assumes that you’re already a C wizard. We don’t. 
Power C includes a step-by-step tutorial and sam- 
ple programs with every function. With our com- 
plete documentation, programming in C couldn’t 
be easier. 


Power Cis factors less expensive. And the source 
code to our function library is available at a 
fraction of their price. 


MSC Turbo C 
C Compiler $450.00 | $99.95 
Library Source 
Code Option N/A $150.00 
Total Cost 

N/A $249.95 


with Source 


RB Sterin sec 















Technical Specifications 
Power C includes: Power C compiler with integrated 
Make, Power C linker, Power C Libraries, Power C 
book, and support for... 

_~_ ANSI standard 

IEEE floating point 

_~_ 8087/80287 coprocessor 

_~_ auto-sensing of 8087/80237 

_#_ automatic register variables 

_~_ mixed model (near & far pointers) 

_~_ CGA, EGA, & Hercules graphics 
Options are... 

__ Library source code 
_~_ BCD business math 
















Order Power C now by calling our toll free number 
or mail the coupon to Mix Software, 1132 Com- 
merce Drive, Richardson, TX 75081. 


1-800-523-9520 


For technical support and for orders inside Texas 
call: 1-214-783-6001 


Minimum System Requirements: 
MSDOS or PCDOS 2.0 or later, 256K memory, 2 floppy drives 
or hard drive recommended, Runs on IBM PC, XT, AT, and 
compatibles, and IBM PS/2 model 25, 30, 50, 60, or 80. 





60 day money back guarantee 
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Product(s) (Not Copy Protected) 


O ($19.95) By 
(1 Library Source Code ($10) aie 


(includes an assembler) 
1) BCD Business Math ($10) Ri, cae 
Texas Residents add 8% Sales Tax $ 
Add Shipping ($5 USA - $20 Foreign) 
Total amount of your order $ 
Power C is a trademark of Mix Software. 


Microsoft C is a registered trademark of Microsoft Corporation. 
Turbo C is a registered trademark of Borland International. 
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Formatted Print Functions: The Innards 


few months ago (August 1987), I 
PR resents the basic theory be- 
hind writing a subroutine with a 
variable number of arguments. This 
month I’m going to apply the theory 
by presenting a version of printft). 
“Why rewrite printfl),” you may well 
ask, ‘‘when you already have a ver- 
sion in the library?” There are two 
main reasons: size and features. 

My version is an integer-only ver- 
sion of the subroutine. Because the 
normal printfl) can handle floating- 
point conversions, the linker will call 
the entire floating-point library into 
your program, even if it doesn’t use 
floating point. The second size-re- 
lated problem is implementation de- 
pendent. Microsoft's printfl) uses up 
an inordinate amount of stack space 
(which causes several problems in 
some applications, such as _ pro- 
grams that use the multitasking ker- 
nel presented in this column in De- 
cember and January). I suspect that 
it builds the entire output string in 
memory before sending it to the 
output device. My own version uses 
a different approach, which I'll dis- 
cuss later. 

The other issue is features. I 
wanted a %b (for binary) conversion 
that would write out a number in 
base 2, and I wanted some mecha- 
nism for centering an object in a 
field (as compared the default right 
justification or the left justification 
available with a minus-sign modi- 
fier). The various conversions sup- 
ported by my printfl) are detailed 
in Table 1, page 100. 


by Allen Holub 


The %p conversion prints a 32-bit 
far pointer in a SEG:OFFSET form 
(use %x to print a 16-bit near 
pointer). To use it in a small-model 
program, you'll have to use a cast: 


printf("%p”, (void far *)ptr ); 
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Note that it’s impossible to get zero 
fill in the offset part of a %p conver- 
sion. That is 1234:0001 is always 
printed as 1234:1. You can use %Op 
to pad out the segment portion, how- 
ever. 


Implementation 
Printf(), fprintf(), and sprintft) all 
use a single workhorse function to 
do the work. This function, called 
idoprnt(), is called with four argu- 
ments: a pointer to an output func- 
tion, an argument to pass to that 
function in addition to the output 
character, the format-string pointer, 
and a pointer to the position on the 
stack of the rest of the arguments. 
Examples 1 and 2, below, show how 
it’s used. 

Figure 1, page 104, shows a pic- 
ture of the stack after a call to: 


sprintf( buf, “%d %lx”, 1, (long)2 ); 


(I've chosen the sprintf{) call be- 
cause it’s the most complicated.) Ar- 


#include <stdio.h> 
#include <stdarg.h> 


Printt( fmt, ... } 
char *fmt; 
{ 


extern int fputc(); 
args; 


va_list 


va_start(args, fmt); 
idoprnt( fputc, stdout, fmt, args }; 
} 


fprintf( stream, fmt, ... 
FILE *stream; 
char *fmt; 
{ 
extern int fputc(); 
va_list args; 


va_start(args, fmt); 


idoprnt( fputc, stream, fmt, args ); 
} 


Example 1: Printf and fprintf 





guments are pushed on the stack in 
reverse order, so the rightmost two 
arguments are pushed first: a long 
int holding the number 2 and a 
normal int holding the number 1. A 
pointer to the format string is 
pushed next, followed by a pointer 
to the output buffer. Sprintft) calls 
idoprnt(), pushing a pointer to the 
first argument, a duplicate of the 
format-string pointer (if you don't 
understand this, go back and read 
the August C Chest), the address of 
the buffer pointer and a pointer to 
the output routine putstr(), which 
will be called to output every charac- 
ter. Putstr() is passed the same 
pointer to the buffer pointer that 
was passed to idoprnt(), along with 
the character to output. 

So, putstr() outputs a character 
by putting it into **p. A glance at 
Figure 1 shows you that two levels 
of dereferencing gets you to a char- 
acter in the buffer itself. The routine 
then increments *p—that is, it incre- 
ments the buf variable that’s in 
sprintfl )’s stack frame. 

Idoprnt() is presented in Listing 
One, page 68. I’ve done a few ques- 
tionable things here—at least from 
the point of view of structured pro- 
gramming—primarily for speed rea- 
sons. If you run the profiler on most 
C programs, you'll find that a large 


#include <stdarg.h> 


putstri(c, p) 
int co: 


* 
aS; 


char 

{ 
*eD = Cc 
(*p) ++ 

} 


int sprintf( buf, fmt, .. 
FILE *stream; 
char ATmt > 
{ 
extern int fputc(); 
va_list args; 


char *start = buf; 

va_start(args, fmt); 

idoprnt( fputc, é&buf, fmt, args ); 
*buf = *’\e0’ ; 

return buf - start; 





Example 2: Sprintf 
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Enhance your Microsoft C programming environment with 
C TOOLS PLUS/5.0™— a new, quintessential library of C 
ns. C TOOLS PLUS/5.0 from Blaise Computing Inc. puts a prime 
quickly building professional applications using the full power of 
Version 5.0 and QuickC. Now you can concentrate on program 
yy having full control over DOS, menus, interrupt service routines, 


oe 


resident programs, printer and keyboard control, and more! 


C TOOLS PLUS/5.0 prebuilt libraries are ready to use 

with either QuickC or the Microsoft C Version 5.0 com- 
’ mand line environment. Complete documented source 
F code is included so that you can study and adapt it to your 

specific needs. Blaise Computing’s attention to detail, like 
the use of full function prototyping, cleanly organized 
header files, and a comprehensive, fully-indexed manual, 
makes C TOOLS PLUS/5.0 the choice for experienced 

developers as well as newcomers to C. 


Continuous refinement of Blaise Computing’s library 
products has produced a collection of tools that are 
unsurpassed for reliability, functionality and ease of use. 
Built upon the widely acclaimed C TOOLS PLUS, 
C TOOLS PLUS/5.0 includes such highly-developed 
eatures as: 
INTERVENTION CODE 


ce 














© RESIDENT SOFTWARE SUPPORT 
— Install, detect and remove memory resident 
programs. 
MENUS 
— Horizontal and pulldown. 
NEW! 
— Lotus-style support. NEW! 


: — Schedule C functions at specified times, inter- 
cursor memory. vals or with a “hot key’ NEW! 
ut, formatted anes — Take full advantage of DOS, even from memory 
w-Oriented output. NEW! resident programs. NEW! 
NTERRUPT SERVICE ROUTINES FAST DIRECT VIDEO ACCESS 
— Capture DOS critical errors and keystrokes. — All monitors, even EGA 43-line mode. 
— Install hardware interrupt handlers. PRINTER CONTROL 


— Access BIOS print functions. NEW! 

— Control the DOS PRINT utility. NEW! 
UTILITIES AND MACROS 

— Take advantage of DOS file structure. 

— Manipulate data types, far & near pointers. NEW! 

— Access any memory areas with fast “peek” and 
“poke” macros. NEW! 











4.0. Screen, window. and menu mana 

including EGA support; DOS memo 
trol; ISRs; scheduled intervention code 
much more. a rrr—_ONSN 







_ NEW VERSION! Now supports Turbo Pas 
4.0. Interrupt driven support for the CO 
ports. 1/O buffers up to 64K; XON/XOFF: 
to 19.2K baud; mode control and XMOD! 
. flewadies -) ( - a 





ie Expanded string ancl screen . 
__ ics routines; memory managem 
program control; DOS file suppo. 





_ ForMS-Pascal. __ 









_C TOOLS PLUS/5.0 supports the Microsoft C Version 5.0 and QuickC 
ompilers, requires DOS 2.00 or later and is just $129.00. 


S¥ NAC IMPROVED! 
C ASYNCH MANAGER is a library of functions designed to help you 
incorporate asynchronous communication capabilities into your 
application programs. Version 2.0 has been rewritten especially for 
Microsoft C Version 5.0 and Borland’s Turbo C. Simultaneous 
buffered input and output to both COM ports at speeds up to 





9600 baud, XON/XOFF protocol, modem con- 5 nas a oe 
trol and XMODEM file transfer are among Ls Dee ine prime 9° oe products o 
the many features supported and is priced at T<...\ Send . — ey he 
| just $175.00. Ve nclose 3 is $< ae cae tandard eo coe 
- ‘ : . e ; 
F —_ Blaise Computing Inc. hasa fullline of support 47 esidents add oO for Federal prot 
products for both Pascal and C. Call today for your ; os ol ae Digi 
free information packet. 1 Name: State!" xp _ 
Address: ; 
wee 6 woes A es a a City: : 
BLAISE COMPUTING INC. i visA or CHE 
2560 Ninth Street, Suite 316 Berkeley, CA 94710 (415) 540-5441 Le- . 
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(continued from page 98) 


percentage of the program's execu- 
tion time is spent in printfl). Conse- 
quently, it’s worthwhile to speed 
things up a little, even if the code 


void printf( char *fmt,...); 
Basic conversions: 
—%d %Ild_ int decimal,/jong decimal 
%ou unsigned int (only, no longs) 
%S string 
%x %ix int hex, long hex — 
%0 %lo_ int octal, jong octal 
%b %lb intbinary,/ong binary _- 
%p far pointer (in hex ne XXXX) 


note that I’ve used the ANSI (not 
Unix) variable-argument conventions, 
all defined in <stdarg.h>, included 
on line 1. 

The <dos.h> file included on line 
2 is supplied by Microsoft and con- 


C CHEST suffers a bit as a consequence. Also | tains #defines for the FP__OFF and | 


FP__SEG macros, which are used to 
extract the offset and segment por- 
tions of a far pointer. There really 
isn't a portable way to do this, but 
one possibility is: 


# define FP__OFF(fp) ((unsigned)(fp)) 
# define FP__SEG(fp) ((unsigned) 
((unsigned long)(fp) >> 16)) 





Note that I’m counting on truncat- 
ing a 32-bit pointer to 16 bits in the 
cast to unsigned. You have to cast 
the pointer to a Jong int in order to 
shift it. 

There are three macros of interest 
















on lines 57-68 of Listing One. PAD 
Supported modifiers (may be combined): outputs fw characters (fc), using the 
%Ox Zero fill to left of number or string indicated output-function pointer 
%o-X Left justify number in field _ (out) and passing that function an 
%\5 Center number in field additional argument (op). To send 
%10x Print number in a 10-character-wide field five spaces to stdout, use: 
%*xX Get field width from the next argument 
%10.5s Strings only: print at most 5 characters from string in a 10-character-wide 


int fp = 


field. If either number is replaced by a *, get the corresponding width from 







printf(“%10.5s’, tr ); 
printt(“%".*s” 10, 5, oF 


ACCESS 
WORKSHEETS 


att 


the next argument. The following are equivalent: 


Table 1: Printf( ) conversion summary 





WKS LIBRARY enables fast and 
reliable access to worksheets. 
Programmers can easily use 
wscanf( ) and worintf( ) to read 
and write worksheet rows. Over 
50 functions. Cell values, 
formulas, macros, range-names, 
column widths, etc are all 
accessible. 


Call (206) 828-4636 
or 800-367-9882 





SOFTWARE, INC. 
3055 112th Avenue N.E. Bellevue, WA 98004 
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WKS LIBRARY v. 2.0 

W Reads & Writes WKS &WK1 
Files 1-2-3 & Symphony 
Worksheet Compatible H DBF 
compatible Works with 

C Compilers from Microsoft, 
Lattice & Borland and Microsoft 
QuickBASIC 4 plus Most UNIX 
Environments iC source Included 
B No Royalties For Executable 
Programs Distributed $195 
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PAD( fp, ’ ’, fputc, stdout ); 


The first argument must be a vari- 
able reference (not a constant). Note 
that an undesirable side effect of 
PAD sets fp to 0 when it terminates. 

TOINT(p,x) converts the integer rep- 
resented by the string p to an int 
and puts the result into x. It modi- 
fies p to point past the rightmost 
digit. INTMASK is a portable way to 
mask off the bottom int-size number 
of bits in a long. That is, given a 
16-bit int and a 32-bit long, I want to 
mask out the bottom 16 bits. I can't 


Say: 


long x; 
x & = Oxifft ; 


because Oxffff is treated by the com- 
piler as an int. Moreover, it’s nega- 
tive. The & = will cause an implicit 
type conversion from int to long, 
performing a sign extension as part 
of the conversion (Oxffff will be con- 
verted to Oxffffffff), and the AND op- 
eration will have no effect. To get 
around this problem, you have to 
cast the Oxffff to unsigned to defeat 
the sign extension: 

x &= (unsigned )Oxffff ; 

The next problem is that Oxffff as- 
sumes that an int is 16 bits. It’s 


better to say: 
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C PROGRAMMERS- 
We asked what you 
wanted in a database 
development system and 
we built it! 
db_VISTA III™ is the database development system for 
programmers who want powerful, high performance 


DBMS capabilities ... and in any environment. Based on 
the network database model and the B-tree indexing 


method, db_VISTA III gives you the most powerful and 
efficient system for data organization and access. From 
simple file management to complex database structures 
with millions of records. db_VISTA III runs on most 
computers and operating systems like MS-DOS, UNIX, 
VAX/VMS and OS/2. It’s written in C and the complete 
source code is available, so your application perfor- 
mance and portability are guaranteed! With db_VISTA 
III you can build applications for single-user microcom- 
puters to multi-user LANs, up to minis and even main- 
frames. 





with § L-based b_QUERY 
and Lotus 123 interface. . pag 








FAST © PORTABLE ¢* ROYALTY-FREE 


PROFESSIONAL SERVICES: In addition to 60 days of 
FREE technical support, we offer complete services to 
get your development project going and keep it on 
track: 

Training Classes ¢ Extended Support * Applications 
Development & C Programming Services * Consulting ° 
Database Design & Optimization ¢ Product Modification 


We're committed to making your database project a success! 


HOW TO ORDER: Call us; we'll help determine your 
needs and get you started. Add components as you need 
them. Ask about the new Lotus interface. . .Call today! 


a BA Relational Relational E 
Zz dbms dbms 


db_VISTA III™ Database 
Development System 





db_VISTA It” $595 - 3960 
db_QUER $595 - 3960 
db_ REVISE ™ $595 - 3960 


db_ VISTA™ File Manager Starts at $195 
WKS Library for Lows 123 Starts at $195 


When high quality data base applications with outstanding 
performance are important to your company’s success: 


GD CALL 1-800-db-RAIMA 


(that’s 1-800-327-2462) 
In the UK call Systemstar Ltd. 0992-500919 


RAIMA 


CORPORATION 


3055 112th Avenue N.E., Bellevue, WA 98004 (206) 828-4636 
Telex: 6503018237MCIUW FAX: (206) 828-3131 














Lvalues and Rvalues 


One of the most frustrating error | 
messages to beginning C program- - 
mers is ‘lvalue required.” An under- 


standing of lvalues and rvalues not 
only gets rid of the error message, 
but it can also help you understand 
complex expression evaluations. 


First some ome | In the ex 


pression: 






Pilea ll Sloe 


Here, x, p, *p, and a/1) are all lvalues 
because all evaluate to addresses of 
single objects. In assembly language, 
[bp] (but not bp without the indirec- 


tion) and the actual labels (__p and 


a) are lvalues. An array name with- 
out the brackets doesn’t form an 


_ Ivalue because it doesn’t evaluate to 
_a single object. In the earlier code, a 
| bp (without the brackets) is an 


_ | rvalue. That is, it’s a temporary vari- 


& = YY; 


x is the lvalue (it’s to the jeft of the 
equal sign) and y is the rvalue (be- 
cause it’s on the right). Lvalues are | 
single variables that you have actu- | 


ally declared, or to be more accu- 
rate, the Ivalue is the address of a 
single variable that you've declared. 
For example, an archetypal (but stu- 
pid) compiler, when given this in- 
put: 


int x, *p, al10]; 


x =1; 
p= &x; 
Dp = 1; 
ait) = 


will generate the following pseudo- 
8086 code: 


mov <x,l 


lea t0,_x 
mov __p,t0 


mov bp,__p 
mov [bp}t 


loa oe 
add bp,2 ; sizeof int) 
mov [bp],2. S 






Figure 2: Argv 
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| able that the compiler uses on the 
way to doing something else. 


As another example of rvalues, the 
expression: xX = a + (b + Cc); gener- 


_ates code like the following: 


mov t0,__a 
mov t1,__b 
NOV t5,__C€ 
add t1,t3 
add t0,t1 


L mov x,t0 


The contents of the variables are 
put into rvalues before they're evalu- 
ated, and the actual evaluation is 
done on the rvalues 10, t1, and 13, 


| not on the real variables. (An opti- 
mizing compiler would clean this 


up, of course, but it’s useful to look 
at the way that the compiler is actu- 
ally thinking.) 

To understand the lvalue-required 
problem, consider the code gener- 


ated by i=a? 7 


OV 10, a 


ada al 


| mov _i,to 


and i= + +a: 


add al 


300 301 


305 306 307 308 









mov t0,_a 
mov __it0 


(Again, ee ee would clean 





sult of the + + | ope ‘It’s the 
rvalue that’s used in the evaluation 
of the rest of the expression (the 
move to __i). 

Now consider an (illegal) state- 
ment, such as (a+b)+ +. The com- 
piler will try to do the following: 


mov t0,__a ; (a+b) 
mov ti, __b 


add t0,t1 


miov 1110 > 7 + 
add t0,1 


There are two things to notice here. 
First of all, the subexpression (a + b) 
generates an rvalue—a temporary 
variable that holds the result of the 
addition. Next, the last two lines 
aren't doing anything useful. They're 
just flailing around manipulating tem- 
porary variables that are never used. 
That's why + + requires an lvalue, © 
because applying it to an rvalue or 
anonymous temporary creates mean- 
ingless code. 

As another example of how a 
knowledge of rvalues is useful, con- 
sider the following complicated ex- | 
pression, which uses argv as pic- 
tured in Figure 2, below (the num- 
bers are arbitrary addresses): 


m= 4+ 4 4 are, 


302 303 304 
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This expression copies the ’n’ (in © 


“one”’) into x. To see how, think 
about rvalues and temporary vari- 
ables. The compiler evaluates the 
expression from the inside out, start- 
ing at the name. The order of evalu- 
ation is determined by the order-of- 
precedence chart. Because * and 
+ + are at the same level but associ- 
ate left to right, you get: 


K—Ult + € (42 are) 


The assignment is done last only 
because it’s of lower precedence 
than either * or + +. The innermost 
++argv generates the following 
code: 


add —__argv,2_ ; sizeof(char’) 
mov 10, argv _t0=—20072-— — 202 


so the ++ (the add instruction) 
was applied to a legitimate lvalue 
(argv) and generated an rvalue (t0) 
that contained argv after the incre- 
ment. That is, given the addresses 
shown in the figure, the code modi- 
fies arg from 200 to 202 and then 
moves the 202 to t0. Now the com- 
piler moves out a notch and sees 
the star. It applies that star to the 
rvalue that resulted from the previ- 
ous subexpression, yielding: 


mov bp,t0 ;bp = 202 
mov ti,[bp] ;t1 = 305 


The star effectively changes the 
rvalue back into an lvalue (in t1) 
because t1 holds the address of a 
single declared object—that is, it 
holds the address of vects/1) (202). 
You can tell it’s an lvalue because of 
the brackets. 

The compiler now moves out a 
notch and finds the second ++. 
Because 11 is an lvalue, everything's 
OK and the following is generated: 


add tit ; sizeof(char) 
mov. t2,tl ;t2 = 306 ; 


Now it finds the next star and gener- 
ates: 


mov bp,t2 
mov. t3,BYTE PTR [bp] 


; bp = 306 
3 = n 


Finally, seeing the equal sign, it gen- 
erates: 
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stupid. It always generates the same 


type of code for the same operator © 


—only the names have _ been 
changed to protect the innocent. 
That is, a + + preincrement always 
generates code having the following 
form: 


_| mov bp,object 
C—O —r— a ae ke . 
There : are two important ings to i 
notice here. First, the compiler is | 


add lIvalue sizeoflobject) 
mov temporary,lvalue 


Similarly, a star always generates: 





ee the a always ap- 


plies an operator to the temporary | 
_(or temporaries in the case of binary | 
operators) that resulted from evalu- 





ating the previous subexpression. — 
That is, it evaluates all expressions, 
no matter how complex, one opera- 
tor at a time, and that operator is 
always applied to the temporary vari- — 
able (read rvalue) that resulted from — 
the previous evaluation. If you keep 
this fact firmly in mind, you can 
interpret any expression, no matter 
how tortuous itseems. $$ —AH. 


Developing ROMs with Microsoft C™? 


Complete it sooner with 


C_thru_ROM 


C_thru_ROM— it works with Microsoft C 
to turn your PC into a complete ROM devel- 
opment workstation: complete debugging, 
complete locating, complete startup code, 
complete documentation, and completely self- 
contained. All to help you complete your pro- 
ject sooner. 


COMPLETE DEBUGGING 


Give hex dumps the dump. Use the remote 
debugger that’s friendly and fast. C_thru_ROM 
allows you to debug on the target hardware 
directly from your PC! Debug at any level: 
source, assembly or mixed. Source-level de- 
bugging uses CodeView™ information. Win- 
dows are provided for viewing source code, 
machine registers, local and global variables, 
and commands. You also get complete execu- 
tion control by tracing, on assembly or C- 
source line, breakpoints on expression and by 
line number. 


COMPLETE LOCATION 


The C_thru_ROM locator puts you in com- 
plete control of the location process. Locate 
code and data anywhere in 8086 memory and 
generate the output format you need—either 
Intel Hex, Intel Absolute OMF, binary image, 
or Tektronics Hex. 


COMPLETE STARTUP CODE 


Don’t waste your valuable time writing start- 
up code—it’s already been done for you. 
C_thru_ROM includes startup code in source 
that’s ready for ROMing. Everything’s pro- 
vided to take your 8086 from a cold start 
through setting the stack, heap, and segment 
registers, and calling main. It even has the 
hooks to handle stack checking, log critical 
errors, perform null pointer checks, etc. 


COMPLETE DOCUMENTATION 


C_thru_ROM’s documentation won’t leave 
you stranded. The package includes everything 


from detailed program information to practical 
advice. Experienced ROM developers can go 
straight to the references they need, while 
learners of all levels can get assistance along the 
way from helpful suggestions and “how-to” 
instructions which are included with C_thru_ 
ROM. 


COMPLETELY SELF-CONTAINED 


When you use C_thru_ROM you're using 
tools that were made to work with each other, 
and with Microsoft C, all on one PC. No more 
hopping from one machine to another, or try- 
ing to make hostile systems interact—every 
part of C_thru_ROM is designed for today’s 
micro, not a rehash of old mainframe tools. 


COMPLETE SATISFACTION 
GUARANTEED 


Order your own C_thru_ROM develop- 
ment package and turn your PC into a com- 
plete ROM development workstation! If you’re 
not completely satisfied, simply return it within 
30 days for a full refund. 


ee 


ORDER TODAY. Call Toll-Free 


1-800-221-6630 


Datalight 


17505 - 68th Avenue N.E., Suite 304 
Bothell, Washington 98011 USA 
(206) 486-8086 





Microsoft and CodeView are registered trademarks of the 
Mi eC ; 
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C CHEST 
(continued from page 100) 


x &= (unsigned)(~0); 


which makes no assumptions about 
word size. 

Idoprnt() itself begins on line 72 
(page xx). Nonconversion characters 
are printed by the for loop on line 
92 and output-routine call on line 
96. The else clause comprises the 
remainder of the subroutine (it 
starts on line 100 and extends to 
line 259). The % conversions are all 
done in this else clause. The various 
modifiers are extracted on lines 
115-142, and the switch on lines 
152-207 controls the actual conver- 
sion. 

I've used a goto on lines 165-169 
to avoid an unnecessary subroutine 
call. The only goto-less way of doing 
the same thing (avoiding the subrou- 
tine call) that I could think of is: 


——— ee 


- | output Ah : : - / | 


base = 0; 


case 'u’: base = (—10 — 16 ); 
case 'x’: base + = (16-10); 
case 'd’: base + = (10-8); 
case 'o’: base + = (8-2); 
case 'b’: base + = ( 2); 


but that’s sick. (That’s a technical 
term.) To see what's going on, note 
that: 


(—10—16) + (16—10) + (10—8) + (8-2) 
+ (2) = =-10 
(16—10) + (10-8) + (8—2) + (2) = =16 


(10—8) + (8—2) + (2) = =10 
(8—2) + (2) = S 
+ (2) ==2 


You can see it better if you shuffle 
things around: 


~10 + (16-16) + (10-10) + (8-8) +( 2-2) 
= eek 









Cc 
o-param 


format 


Figure 1: Stack frame during a sprintf( ) call 
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The multiple adds are both slow 
and abstruse, however, so a goto 
seems a better choice. 

The masks on lines 186 and 190 
defeat sign extension on nondeci- 
mal int-size numbers and unsigned 
ints. You can't allow sign extension 
on a hex conversion because it 
would add leading Fs to the num- 
ber. If the number is negative and 
zero fill is active, the minus sign is 
printed on line 200. I do it here to 
avoid things such as 000-2 instead 
of —0002. The actual conversion is 
done by the I/tos() call on line 205, 
which I'll discuss shortly. 

The code on lines 214 to 225 both 
\0’ terminates the string and figures 
the length. In the case of a %s con- 
version, bp will hold the same 
pointer that was passed into the 
original printf{() call. Because the 
string is already terminated, all you 
need is the length, extracted with a 
strlen() call on line 222. If you did 





output buffer 


“% Id % x” 
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the conversion yourselves, the con- 
verted characters would be in nbuf, 
and bp would point at the end. You 
can subtract the two pointers to get 
the length. 

The remainder of the loop just 
prints the converted string along 
with any necessary leading or trail- 
ing padding. You then loop back up 
to get the next conversion character. 
The advantage of this approach is 
that you need only enough local 
buffer space to take care of the larg- 
est possible numeric conversion, as 
compared to a worst-case buffer for 
the entire line. 

The remainder of the file is just a 
test routine that makes sure every- 
thing works. 

Ltos() is a long-int-to-string con- 
version routine. It’s in Listing Two, 
page 71. There are only two things 
of interest. First, I’m building the 
string from back to front to make 
the conversion easier. The string is 
reversed in place on lines 54-61. 
Next is the somewhat weird-looking 
line 46: 


“+ +bp = 
“0123456789abcdef | n % base J; 


The string “0123456789abcdef” evalu- 
ates to an rvalue of type pointer to 
char and the square-bracket nota- 
tion can be applied to any pointer. 
For example: 


“0123456789abcdef’ [ 5 }; 
evaluates to the character 5 (0x35). 


Availability 

All the source code for articles in 
this issue is available on a single 
disk. To order, send $14.95 to Dr. 
Dobb's Journal, 501 Galveston Dr., 
Redwood City, CA 94063, or call (415) 
366-3600, ext. 221. Please specify the 
issue number and format (MS-DOS, 
Macintosh, Kaypro). 


DDJ 


(Listings begin on page 68.) 


Vote for your favorite feature/article. 
Circle Reader Service No. 7. 
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The 
Heap Expander 
version 2.0 


TM 


Now your programs can have virtually unlimited heap space using expanded 
memory, extended memory, disk space, or any combination of the three. And it’s all 
transparent. The Heap Expander’s initialization code checks the system’s resources 
and uses whatever is available. 


Libraries and Source Code for: 


@ Turbo C 
@ Microsoft C 4.0 and 5.0 
e@ Uses LIM-standard expanded memory @ Turbo Pascal 3.0 and 4.0 


if present. 


e@ Uses AT-style extended memory if Requires an|IBM PC, XT, AT, orclose 
present. compatible with MS-DOS or PC-DOS version 


@ Swaps data to disk as needed. 2.0 orabove 


MC/VISA/COD call 
1-800-248-1045 x 100(US) 
1-800-952-5560 x 100 (Idaho) 


The Tool Makers 


P.O. Box 8976 
Moscow, Idaho 83843 
208-883-4979 


*Idaho residents add 5% sales tax 
Foreign customers add $4.00 for shipping 
and handling. 
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For DOS, Microport 
UNIX, SCO Xenix or @) 


Protected Mode 


The Advanced 
Programmer's Editor 
That Doesn't Waste Your Time 


Fast, EMACS-style commands—completely reconfigurable 
Run other programs without stopping Epsilon—concurrently! 
C Language support—fix errors while your compiler runs 
Powerful extension language _@ Great on-line help system 
Multiple windows, files e Regular Expression search 
Unlimited file size, line length e Supports large displays 
30 day money-back guarantee e Not copy protected 


Only $195 
L_tqiar~Uu 


Software Ltd. 


5843 Forbes Avenue —_ 
Pittsburgh, PA 15217 for IBM PC/XT/AT’s or compatibles 
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COLUMNS 


TO THE MACS 


A Few Things That Work, Something That Doesn't, 


n case you didn't catch my first 

column back in January, let me 
say it again: reviewing makes me 
uncomfortable. Creators put a lot of 
sweat into getting a product to mar- 
ket. Print is powerful stuff, and a 
bad review can do much harm. On 
the other hand, I like to share good 
news. So, in this column I'll talk 
about things I’ve used for a while 
and fundamentally like. Just call me 
Pollyana Krute.... 

On objectivity: I hate to crush any 
world views, but it’s a myth. Product 
reviews are inevitably subjective. The 
best I can do is let you in on some 
of the experiential baggage I filter 
through. Also, I know and/or have 
worked with some of the people 
whose goodies I'll be reviewing. I'll 
always mention any such connec- 
tions. Just know it’s done to help 
you weigh my opinions, not as 
name dropping. 


QUED/M 2.04 
DDJ ran a nice article by Levi Tho- 
mas and Nick Turner on program- 
mers and their text editors last year 
(February 1987). The article sug- 
gested that programmers might be a 
bit like baby ducks, bonding strongly 
with the first warm editor they meet. 
So, to help you assess the forthcom- 
ing opinions, my first computer- 
assisted writing was on IBM card 
punches and Teletype paper-print- 
ing terminals. Though primitive, 
both tools sported evocative sound 
effects. 

Editing sounds have devolved, but 


by Stan Krute 


text hacking’s come a long way. I’ve 
done a lot of writing in succeeding 
decades, and currently work with 
several text-editing programs. My cur- 
rent favorite is QUED/M 2.04. It gives 
me power, speed, ease of use, and a 
smooth-sloped learning’ curve. 
Though I briefly mentioned the prod- 
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and a Little HyperTalking 





uct back in column 1, I'd like to give 
a few more details. 

Got a bad case of featuritis? QUED/ 
M’s got almost all the ones I've ever 
seen and/or wanted and a few more. 
A nonexhaustive list is: 


@a powerful macro language, com- 
plete with a real-time recording 
mode 

@ high levels of user-configurability 
® undos up to 32,767 (love that num- 
ber) actions deep, depending on 
your RAM resources 

® powerful regular expression and 
metacharacter facilities 

® text folding 

@ line sorting 

® ten clipboards 

@ automatic saves to two directories 
® automatic saves after a configur- 
able number of keystrokes 

®@ backups of previous versions of a 
saved file 

® adjustable scrolling parameters 
@a full set of capitalization/casing 
commands 

@ multiline horizontal motion by 
tabs or spaces 

® gremlin zapping 

® windows with mucho status infor- 
mation 

® window tiling and stacking com- 
mands 

® user-configurable transfer menu 

@ parentheses balancing, with user- 
designatable definitions of “paren- 
theses” 

@the ability to open many files si- 
multaneously 

® multifile search/replace operations 
® windows with horizontal and ver- 
tical split-paning 

® text markers 


@ intelligent extensions to Apple's 
standard file-opening dialog 


And on and on.... I sense QUED/ 
M’s designers have used a lot of text 
editors and Mac applications and 
have kept lists of features they've 
liked, detested, and wished for. And, 
unlike some applications that sport 
an abundance of commands and 
options, QUED/M’s design and im- 
plementation seem clean, well or- 
ganized, and intuitive. 

There are three things I'd like in a 
future QUEDM: 


@ the ability to extend the command 
set via user-written standard Mac 
CODE resources 

@ the ability to work with files that 
don't fit whole hog into RAM 

@a thicker manual, with slower/ 
deeper explication and many more 
examples, particularly in the discus- 
sions of regular expressions and mac- 
ros 


Victor Romano programmed 
QUED/M 2.04. He and Jerzy Lewak 
designed it. Jerzy also wrote the man- 
ual. Two people, one fine text-edit- 
ing product. Kudos, gentlemen, and 
thanks. I wish I had QUED/M in all 
my other computing worlds. 


TMON 2.81 
Here’s more detail on another prod- 
uct I mentioned briefly back in col- 
umn 1. TMON 2.81 is the Mac de- 
bugger I use all the time. It’s small 
and rugged and works on a wide 
range of code resource types in a 
variety of complex environments. 
TMON 2.81 provides a full range 
of standard debugging features. It 
runs in a simplified windowing envi- 
ronment that won't go down if your 
code munches critical parts of the 
Mac's regular windowing operations. 
In a variety of ways, you can: 


@®examine and change memory at 
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PAINLESS WINDOWS. 








Windows. Data Entry. Menus. 
Finally, a C programmers’ tool that makes 
them as easy to use as printf). 

With Greenleaf DataWindows™ 


you move in quantum leaps! 


MES Snazzy Window Treatments 


DataWindows represents an important 
breakthrough in C programming tools. It 
sets you free so you can create exciting 
programs quickly and easily, saving both 
time and money! Developed to work with 
the IBM PC, XT, AT, compatibles, and 
MSDOS or PCDOS, DataWindows is a 
carefully tooled system of C functions which 
will jazz up your programs with 
unprecedented efficiency. 


Greenleaf DataWindows is integrated 
windows, transaction data entry, pop-up, 
pull-down, and Lotus style menu systems 
with: 
= Screen Management. You don’t have to 
remember what’s on the display or the 
sequence in which you put it there. 
DataWindows does the grunt work. 
There are no restrictions. 


® Transaction Data Entry. Data entry 
windows can have any number of fields 
with sophisticated options for reading 
many data types. Calls are made to help, 
validation, and other functions. Full 
featured text editing, protected and 
mandatory fields, dBASE type picture 
strings, context sensitive help, validation 
of fields and transactions, redefinable 
keys, password entry, attribute control, 
keyboard idle and much more. 


™ Device Independence. It detects the type 
of display adapter your computer is using 
and adjusts to it automatically for CGA, 
EGA, or monochrome. Logical video 
attributes are easy to use for color or 
monochrome. 

= Compatibility. Runs with Microsoft 
Windows and IBM TopView. 

® The Greenleaf Tradition of Quality. Reliable 
products. Professional documentation that 
gets you up and running quickly and 
keeps you there. Reference card. 
Newsletter and Bulletin board. 


IBM, Microsoft & dBase, are registered trademarks of International 
Business Machines, Microsoft Corporation & Ashton-Tate respectively. 
PCDOS, IBM PC, XT, AT, & TopView are trademarks of IBM; MSDOS. 
and Microsoft Windows are trademarks of Microsoft Corporation. 





EEE Stop Window Shopping 


Order Today. Or call toll free for a free 
demo of the windows library that makes 
all the others obsolete. 


Order any of these high performance 
tools by calling your dealer or 
1-800-523-9830 today. Specify compiler 
when ordering. Add $8 for UPS second 
day air, or $5 for ground. Texas residents 
add sales tax. MasterCard, VISA, P.O., 
check, COD. In stock, shipped next day. 





Greenleaf DataWindows $225 
DataWindows Source Module $225 
The Greenleaf Comm Library v2.0 $185 
The Greenleaf Functions v3.0 $185 
Digiboard Comm/4-II $325 
Digiboard Comm/8-II $535 





GREENIEAIF 
S oo 
16479 Dallas Parkway, Suite 570 


Dallas, TX 75243 
Call Toll Free 


1-800-523-9830 
In Texas and Alaska, call 


214-248-2561 
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= Simple or Complex Windows. Up to 254 
powerful overlaid windows 
simultaneously, all with just one kind of 
window to remember! Yet any window 
can be from one character to 32K! 


® Easy Window Operations. DataWindows 
lets you move, zoom, frame, title, change 
colors, titles, frames, size, location, and 
make windows visible or invisible at will! 
Functions set cursor, attributes, and write 
data to any window or “current window”. 
Word wrap, auto scroll, keyboard 
functions. 


@ Write to Any Window Any Time. Windows 
may be visible, overlaid, or invisible, and 
you can write to them anyway. What you 
write will be seen when the windows 
become visible. 

® DataWindows is fast! It writes directly to 
video memory (in some modes). 


@ Easy to save! Any window, complete with 
attributes, can be saved on disk quickly 
and efficiently. 


™ Source code available. No royalties. 
EE Also from Greenleaf: 


The Greenleaf Functions v3.0 
The most complete, mature C language 
function library for the IBM PC, XT, AT 
and close compatibles. Includes over 225 
functions — DOS, disk, video, color text 
and graphics, string, time/date, keyboard, 
disk status and Ctrl-Break functions plus 
many more. 


The Greenleaf Comm Library 
Our 2.0 version is the hottest 
communications facility of its kind. Over 
120 functions — ring buffered, interrupt 
driven asynchronous communications for 
up to 16 ports simultaneously with 
XMODEM, XON/XOFF, many many 
sophisticated features. 


We support all popular C compilers for 
MSDOS/PCDOS: Microsoft, Lattice, 
Computer Innovations, Aztec, DeSmet, 
and others. 
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(continued from page 106) 


ing its command set 

@ recover from crashes 
several levels of abstraction There is one glaring omission in 
®@ stop and start code execution this version of TMON: though it 
® fiddle with heaps won't blow when used with a 68020 
® convert and resolve quantities and | or 68881, it won't disassemble non- 
expressions relevant to Mac program- | 68000 instructions or display non- 
ming work 68000 registers. So you can't really 
® customize the program by extend- | debug anything involving 68020s, 


68881s, 68851s, et al. Shame, shame. 

TMON was originally developed 
as an in-house tool by ICOM Simula- 
tions, whose other products include 
the graphic adventures Deja Vu and 
Uninvited. Waldemar Horwat (not a 
pseudonym, he _ actually exists) 
wrote the bulk of the program, albeit 
at a frighteningly young age. Darin 
Adler, currently working for Apple’s 
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Figure 1: A click on the directory name box in a 


standard file dialog brings up HFS Navigator's handy list 


of favorite directories. 
























About HFS Navigator™... 


New Folder... 
Find Folder... 
Find File... 
find Nest 
Get Info... 


Figure 2: Pressing the Command key causes Navigator 
to bring up its action menu. 


C Programmers: Combine C and COMMON LISP 
OTH EN eee AOE 


Simple. 


Add LISP features to your software without mak- 
ing it a full time job. The TransLISP PLUS tutorial 
on-line help, and 30 sample programs with 
commented source make it easy. 


? 


Practical. 


Start by modifying the LISP sample programs 
and including them in a system you wrote in C. 
Yes, in C! TransLISP PLUS includes a C Language 
Interface that lets you integrate your Microsoft C 
code and libraries with all or portions of our LISP 
interpreter. 

Use TransLISP PLUS to add natural or command 
language features to replace menus. . . . or to flexibly 
manage related but disparate information. Code 
from C libraries provided by other vendors can be 
integrated into your program to perform tasks not 
normally part of LISP. 
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|The 
Coder’s 
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‘TransLISP PLUS. 


Thorough. 


TransLISP PLUS took over 400 primitives from 
the most widely used and respected LISP standard, 
COMMON LISP, and made it available on IBM 
PCs, XTs, ATs, and virtually every other MSDOS 
machine. So now you can work with anything from 
a $700 PC to a $7000 PC. 

The utilities toolbox is included at no charge with 
a built-in editor, pretty printer, cross reference, 
and additional debugging tools. 

An optional Runtime encrypts your source code 
so that you can distribute your applications safely. 
You pay no royalties. 

Requires MSDOS 2.0+, 320K RAM, and a 360K floppy. 


MONEYBACK GUARANTEE 


Try TransLISP PLUS ($195) for 30 days — if not 
satisfied get a full product refund. The Optional 

Runtime is available for $150. Or start by learning 
LISP with TransLISP ($95) then upgrade to PLUS 


for $158. 
Call (800) 255-4659 
In MA (617) 331-0800 


Source ™ 541-D Main St., Suite 412, So. Weymouth, MA 02190 
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expanding Mac Tech Support team, 
did the set of command extensions 
(known as the User Area) that ac- 
companies this version of the debug- 
ger. The new manual is quite good; 
Paul Snively wrote the users’ guide 
section, and Waldemar wrote the 
technical reference part. 

TMON may face some rough mar- 
keting pressures over the next few 
months as Think, Borland, and Ap- 
ple bring out new source-level de- 
buggers. TMON works primarily at 
the assembly level, though it has 
rudimentary source code label capa- 
bilities. But those other tools aren't 
out yet. And, even when they are, 
TMON should still be useful as a 
robust common denominator tool, 
especially when it’s Eperaced to full 
680x0 support. 


HFS Navigator 

HFS Navigator is a small utility that 
Michael Kahl, chief programming 
force behind Lightspeed C, showed 
me on my September visit to Think 
central. It hooks into the Mac's stan- 
dard file-opening and saving dialogs 
and lets you hop quickly to favorite 
directories on file opens and saves. 
It also finds files and directories and 
can create new directories on the 
fly. 

That’s not a bad set of features, 
but I already had desk accessories 
that pulled off the last three func- 
tions, and I’ve become quick and 
comfortable mousing up, down, and 
sideways through my carefully or- 
ganized HFS directories. Sure, Navi- 
gator looked like a nice hack, but I 
didn’t think I needed it. 

I was (eventually) wrong. I tried 
Navigator for a week, gave it up, 
came back in a day, and now I’m 
hooked. You know how it is: a little 
taste of Mac ergonomics only makes 
you hunger for more, and HFS Navi- 
gator feeds the pangs. 

A simple installation program lets 
you add Navigator to your HFS disk. 
Thereafter, whenever you mouse- 
press on the directory button in a 
standard HFS file dialog, HFS Naviga- 
tor pops up a special menu of your 
favorite directories (see Figure 1, 
page 108). You just select the direc- 
tory you want to go to, and youre 
there, without having to mouse up 
and down the branches of the HFS 
directory tree. The current direc- 
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PROGRAMMING WINDOWS is your fastest 
route to great applications using Microsoft’s new 
MS-DOS Presentation Manager: Windows 2.0 and 
Windows/386. Charles Petzold has packed his book 
with reference data, programming techniques, and 
dozens of C programs and utilities. More than 800 
pages of information to help you: get the most out of 
the keyboard, mouse, and timer # work creatively 
with icons, cursors, bitmaps, and strings @ take ad- 
vantage of child window controls ™ incorporate key- 
board accelerators = master the Graphics Device 
Interface (GDI) = even get a head start on program- 
ming for tomorrow’s OS/2 Presentation Manager. 
PROGRAMMING WINDOWS —you know it’s 
authoritative because it’s from Microsoft. $24.95 


Microsoft’ Press 


Hardcore Computer Books 


Available wherever books and software are sold. 


Book Code 86-96049. 
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Plus 
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Advanced Screen Manager 


Building an interactive application 
in C? PANEL Plus nreades the 
features you need for professional 
program development: 


PRODUCTIVITY 


The PANEL Plus interactive screen 
design tools are the fastest way to 
get your application screens set out 
and tested. Just type oR on 
the screen, mark out entry fields, 
define display and entry attributes, 
help boxes, borders, pop-up areas. 
Fields can be edited, moved and 
resized, and validation details 
entered — with the screen displayed 
so that you can see the effect of 
your changes. 


Then PANEL Plus saves your work 
to disk, from where you can either 
load the design directly into your 
application program, or for better 
control, automatically generate C 
data structures, field areas, and 
header files which are compiled 
and linked into your program. 


PANEL Plus screens can include 
all the features demanded by 
today’s applications. Several 
different menu types are provided, 
including highlighted bars with 
help lines. Easy-to-use library 
functions support pop-up fields, 
horizontal and vertical scrolling in 
a field, and validation exits for 
supplied or custom data checking 
functions. Text functions can also 
be carried out in graphics mode 
using a supported graphics 
function library. 








EASE OF USE 
Although the library contains over 
150 functions, it is logically 


oe so that most programs 


only need to use a small subset. 


Documentation is provided with 
examples of all the main function 
calls. PANEL Plus includes full 
library source, with variant files for 
all supported systems, and no 
royalties are payable for the use of 
PANEL Plus libraries when linked 
into user applications. 


PORTABILITY 


PANEL Plus is designed to allow 
your programs to be ported to just 
about any environment where you 
can find aC compiler. Every 
version of PANEL Plus includes 
source modules for interfacing to: 


~ DOS, OS/2 protected mode, 


Amiga Intuition, Unix (with and 
without termcap or termio), Xenix, 
DOS-J (including 16-bit character 
editing), and VAX/VMS. 
Graphics libraries supported 
include MetaWindow, HALO, 
Essential Graphics, Microsoft C 
V5, and Turbo C V1.5. The 
Microsoft mouse can be used in 
PC versions. 


Telex (UK): 
Fax (UK): 


444453 AWARE G 
(0672) 54436 








Roundhill Computer Systems Limited 
PO Box 8107, Englewood NJ 07631 


Roundhill Computer Systems Limited 
PO Box 14 Marlborough SN8 1LR England 


Now available ! 


Roundhill announces screen tools 
for use with the new C compilers 
from Borland and Microsoft. 
Special introductory prices: 


PANEL/TC — $129.00 
For use with Borland’s Turbo C 


PANEL/QC — $129.00 
For use with Microsoft’s Quick C 


(after May 1st 1988, $149.00) 


Each package is configured for 
use on an IBM PC or compatible 
system, and screens can be 
esigned and built into your 
programs while running in the 
special development environment 
provided with the compiler. 


All the PANEL Plus library 
functions are supported, and 
source code for every validation 
function is provided so that you 
can customise the entry checking 
to suit your application. When 
you need to move your programs 
to other environments, or need 
the full library source for other 
reasons, upgrades to PANEL Plus 
are available. 


PANEL/QC can be run in any of 
the graphics modes supported by 
Quick C, and also interfaces to 
Microsoft C V5. PANEL/TC fully 
supports the Turbo C 1.5 graphics 
library. 


PANEL Plus for MS-DOS or for 
OS/2, with full library source, is 
priced at $495.00. Versions are 
available for the Aztec, Borland, 
CI C86PLUS, IBM, Lattice, Mark 
Williams, MetaWare, and 
Microsoft compilers. Please call 
for prices of PANEL Plus for Xenix 
and Unix systems, and for 
VAX/VMS. Existing registered 
users of PANEL will receive a 
credit against the PANEL Plus 
license fee. 





(201) 569 2265 





(0672) 54675 
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tory, shown at the top of Navigator's 
pop-up menu, can either be added 
to or deleted from the list of favor- 
ites. 

If you hold down the Option key 
when you mouse-press the standard 
file dialog’s directory button, up 
comes the standard pop-up menu, 
showing the path to the current 
disk’s root directory. And, if you 
hold down the Command key dur- 
ing the mouse-press, a master menu 
pops up that lets you find files and 
directories and create new folders 
(see Figure 2, page 108). Folder mak- 
ing at such an opportune moment 
is very useful. 

I do have two things I'd like the 
makers to tweak, in the name of 
even greater ergomania. First, as cur- 
rently configured, the menu of favor- 
ite directories is limited to 16 en- 
tries. I keep bumping up against 
that ceiling. My solution would be 
to raise the limit and, to keep user 
access fast, arrange the entries in 
two dimensions, as a table rather 
than as a list. See Figure 3, page 113, 
for my vision. 

Second, I don’t like having to hold 
down the Option or Command keys 
when I want the standard path-to- 
root or master pop-up menus. A 
possible solution would be to give a 
mouse-press on one side of the di- 
rectory button to get the favorites, a 
press on the other side to get the 
path-to-root, and a press within a 
few pixels of the top of the directory 
button to bring up the master menu. 

HFS Navigator has a competitor, 
FindSwell, but I haven't got my 
hands on it yet. When I do I'll report 
back. Meanwhile, as I said earlier, 
Navigator’s got me hooked. 





WYSIWYG Ain’t 
I do like to maintain a positive atti- 
tude. So view the next few para- 
graphs as an opportunity for fabu- 
lous personal financial growth. See 
a need and fill it, as the kitty litter 
and blue toilet water inventors say. 
Here's the situation: I recently 
spent three weeks doing production 
desktop publishing with a friend 
who’s a commercial printer. I was 
also involved in producing the first 
issue of another friend’s desktop- 
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EGA. VGA. HGC. MCGA. No matter what your 
hardware configuration, the PROGRAMMER’S 
GUIDE TO PC & PS/2 VIDEO SYSTEMS pro- 
vides all the information you need to create fast, pro- 
fessional, stunning video graphics on IBM PCs, 
compatibles, even the new PS/2s. No other book 
offers such specialized programming data, tech- 
niques, and advice to help you tackle the exacting 
problems of programming directly to the video 
hardware. And no other book offers the scores of 
invaluable source code examples included here. 
Whatever graphic output you want — text, circles, 
alphanumeric character sets, bit blocks, anima- 
tion—do it cleaner, faster, and more effectively 
with Wilton’s book. PROGRAMMER’S GUIDE 
TO PC & PS/2 VIDEO SYSTEMS —a one-of-a- 
kind resource for serious programmers. $24.95 


Microsoft’ Press 


Hardcore Computer Books 


Available wherever books and software are sold. 
Or call in your credit card order. 800-638-3030 (In MD 824-7300). Refer toad DD48. 
Book Code 86-96163. 
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FOR COMMON CODE 


VN you getting the recommended monthly 
allowance of C, Assembly, Forth, Pascal, 

Ses oe BASIC or Modula-2? Subscribe to Dr. Dobb’s 
e Journal of Software Tools and you won’t catch 
its we any nasty bugs again! 

Each month the Doctor brings you aid for 
ailing algorithms and the cure for common 
code. For the latest developments in 
software design and pages of code that will 
make you a more productive programmer, 
take the Dr. Dobb’s prescription. 

For more than a decade, the programming 
elite have known Dr. Dobb’s Journal to be 
the foremost source of software tools. 
Subscribe now and get your monthly dose 
from the Doctor. 
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TO THE MACS 
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published magazine. And I just fin- 


ished putting out my own little soft- 
ware company’s latest quarterly cata- 
log. In all three instances Macs were 
used, and the overall process and 
results were quite satisfying. But we 
repeatedly came up against an irri- 
tating and needless bugaboo, one 
that creates the incredible opportu- 
nity noted earlier. 

WYSIWYG is a myth. What you see 
on the Macintosh screen is not what 
you get on the laser-printed page. 
Oh, it’s close. Frustratingly close. But 
not close enough for real commer- 
cial production work. Hairlines vary 
in size. Text and graphic elements 
lose their relationships. Whole sen- 
tences can switch pages. On-screen 
measurements indicate you're con- 
trolling placement to four or five 
decimal places, and the finished re- 
sult can vary by big pieces of inches. 
And this is true, to varying but never 
completely insignificant degrees, 
with every piece of desktop software 
we used. So you proof and kludge 
and proof and kludge until the re- 
sult’s acceptable. 

There’s no good reason for such 
behavior. These are computers, kids, 
and they're very good at arithmetic. 
The Mac has SANE, with ungodly 
levels of precision. If software SANE'’s 
too slow, you can write directly to 
the hardware. If Apple’s LaserWriter 
driver doesn't work properly, just 
send PostScript out directly. If Post- 
Script’s the problem, learn how to 
work around it. But, please, some- 
body, do something. This is intoler- 


HuperCard To copy the Scouting Toolkit toa DUPLICATE 
target card: Make sure the pathname TOOLRI 

tards in your Home stack know how to get 

to this card. Then: click on this button. 

Go ta the target card, and give the Paste Button 

command. The rest is automatic. 


SCOUTING 
Click on this button —» to open up the Scouting Toolkit window 7 


Scouting Toolkit” 


S| The Scouting Toolkit window 

contains Bight main buttons. |, 
The top four toggle various 
HuperCard controls. The bottom 
four take you places. 


i] Clicking anywhere else inside 
the Scouting Toolkit window 
closes the window, and brings back 
the icon button shown in [2] above. 


Clicking on this button > 
s ee removes the 

SS Scouting Toolkit 

from a card. 





Figure 4: The Scouting Toolkit’s card of residence 


Dr. Dobb’s Journal, April 1988 


Scouting Toolkit™ 


KOme 


able. 

Deliver desktop publishing accu- 
racy along with ease of use and 
automated power, and you'll get 
very rich. 'Cos there are a lot of 
people out there doing this stuff, 
and they all know the truth: the 
WYSIWYG emperor's walking around 
stark jaybird nekkid! 


Code Corner 

I spent some time this last month 
wandering around HyperCard and 
HyperTalk. Serendipitous travel’s my 
most fruitful learning mode. This 
month’s code corner features a 
small toolkit I built to aid that explo- 
ration. Building and running it re- 
vealed some of HyperCard 1.0.1's con- 
tradictory qualities. 

First, the script editing facilities 
can be politely described as primi- 
tive, but the graphics editing facili- 
ties are elegant. 

Second, execution speed can be 
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early notes 
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magic 
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slow. Depending on the hardware, 
this month's project takes 0.5 to 4 
minutes to copy less than 20 objects 
from one stack to another. Third, 
execution speed can be fast. My 
buddy Bruce The Q. Hammond built 
a 40,000 card HyperCard database 
(he likes to break and fix things). 
Searches over this multimegabyte 
file were in the sub-30-second range. 

Fourth, HyperTalk syntax can be 
intuitive. Right from the start I could 
write large pieces of code without 
continual manual browsing. Fifth, Hy- 
perTalk syntax can be inconsistent— 
for example, the usage of the word 
the. Sometimes it’s optional, some- 
times it’s mandatory, sometimes it’s 
forbidden. Aargh! Who can keep 
track? 

Sixth, HyperCard can be used to 
build large, complex coordinating 
tools. Take a look at some of the 
commercial applications starting to 
appear. 


| personal vitals 

| pragmatic notes 
| pretty girls 

| pristine places 

| private thoughts 
| privileged feuds 
quaint pix 

; wanderlust 

| wish list 

| whoopdedoo 

: Hylophonics 

| zitherations 

| zoroastrics 

: Zorro 

| 22z2z2z2222z222722 





Figure 3: Author's vision of an improved Navigator, stretching the user 


interface along an orthogonal path 
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Figure 5: Where the 15 buttons and 2 (hidden) fields live 
on the toolkit’s residence card 
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_] Multiple bullet proof overlapping windows 
_] Easy single field or full screen data entry 
1 Unlimited data validation 

_1 Context sensitive help manager 
_1 Menus like Lotus & Mac 

.. Programmable keyboard handler 
1 Text editor routines 

1 Printer output routines 


Better Applications In Less Time 


Fast, flexible, versatile, reliable. Just 
some of the reasons why serious program- 
mers use Vitamin C in their most impor- 
tant projects. They know using Vitamin 
C means lightning fast displays, a 
responsive user interface, professional- 
ly crafted C code, and a commitment to 
technical support. 











High level functions provide . a 
maximum speed and productivity. iP p NN 
Extended versions of these 


same routines add flexible con- 
trol over specific details when 
necessary. 


Versatile Design Keeps You In Control 


Options and possibilities rather than limitations and 
frustrations mean you're always in control. Our versatile 
open ended design is full of hooks so you can intercept and 
plug-in your own control functions to easily customize or 
add features to most routines. 


Easily create windows that pop-up, overlap, zoom, 
move, scroll, hide, show and resize. You'll choose options 
for titles, borders, colors, scroll bars, virtual size, and 
more. You can even access any window any time, even if 
it’s hidden or invisible. That’s flexibility. 


Sophisticated data entry forms become easy with fea- 
tures like unlimited validation, protected, invisible, and 
scrolling fields, full color control, single and multiple field 
input, selection sets, even right-to-left numeric input! 
And, with the context sensitive help system it’s easy to 
provide field specific or other help messages. 


Vitamin C’s menus are the perfect framework for any 
application and feature advanced options such as check 
marks, unavailable items, blank items and separators. 


The keyboard handler routines can redefine key as- 
signments, translate keystrokes, even call a function. 

Utility routines for time/date management, back- 
ground processing, and sending windows to a printer. 

Thorough documentation with tutorial and reference 


sections. Reference databases compatible with the Norton 
Guides Instant Access Program are also available. 
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130 day money back guarantee 

_I No royalties or runtime fees on applications 

_1 Complete library source code included FREE 

_I FREE technical support 

_IFREE BBS at (214)418-0059 

_1 Supports Microsoft 5, Quick C, 
Turbo C, Lattice and others 

_1 Optional screen painter/generator 


Generate Code inten 


Speed development even more-with 
VCScreen, our interactive screen painter / 
code generator. Define windows, boxes, 
borders, headings, input and output 
fields. Copy, delete, change, move, even 
layer objects. Then let VCScreen 
generate C source code ready to compile 
and link with the Vitamin C function 
library. 





New features allow creation 
of multiple windows, menu 
systems, global variable main- 
tainance, user defined code 
generation options, and more user configuration options! 


Users And Reviewers Agree 


" Picking the best value package is hard... If you’ re a source code fanatic 
like me, Vitamin C is preferable. If you need source code, make sure 
your wallet is wide open or get Vitamin C. " 

Computer Language, June °87 








"Only Vitamin C supports keyboard handlers and keyboard reassign- 
ment. Vitamin C provides the most options for menus." 
BYTE, October ’87 


"T trust our review of [Vitamin C] in Computer Language magazine was 
fair ...it has become the screen manager package of choice at my firm." 
Michale Wilson, Wilsoft, Inc. 






OS/2, UNIX and Xenix versions 
now available. Call for prices 
and details. 


Vitamin C.......... $9.7500 


Includes source. Specify compiler 
when ordering. 


VCScreen.......... $1490 


Requires Vitamin C library above. 


Reference Database... °50” 


Requires the Norton Guides program 
sold separately. 





ORDER NOW! 
(214) 


416-6447 
creative 


PROGRAMMING 











Requires IBM PC, XT, AT, PS/2 or com- 
patible. Include UPS shipping: $3 for 
ground, $6 for 2nd day air, $20 for over- 
night, $30 if outside U.S. All funds must 
be in U.S. dollars drawn on a U.S. bank. 








Box 112097 Carrollton, Tx 75011 _ 
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And finally, HyperTalk can bog 


down while running through large 
amounts of complex code. Take a 
look at some of the commercial ap- 
plications starting to appear. 

Notice the seesaw here. It’s good, 
it’s bad. It’s fun, it’s irritating. It 


DURLICATE 
sCOUTIN 


PREVIOUS 


30001 


breaks Macintosh conventions, it ex- 
tends the Macintosh metaphor. 
Hmm.. final judgments will obvi- 
ously have to wait. Let’s just hope 
Bill and his team keep at it ‘til they 
get it right. Meanwhile, on to the 
project. 


Getting a Toehold 
As I learned long ago from the Ker- 


DELETE 
SCOUTING 


Figure 6: Design details of the 12 icons used in the Scouting toolkit 


Sierra OPS5 


Create sophisticated expert systems on your PC 
with the expert systems language. 


Sierra OPS5 is a fast, sophisticated, absolutely 
100% complete implementation of OPS5 designed 


specifically for the PC. 


FULL: We left nothing out — 32 bit integers, gs 
real numbers, files, ‘build’, external functions, 


NASA 
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"Monkeys & Bananas" 


nighan/Ritchie/Plauger crowd, the 
first thing you want to do in a new 
environment is build some simple 
tools, then lever yourself up into 
power and sophistication. Hyper- 
Card’s no exception to the rule. 

Whenever I started work on a new 
stack or card, I found myself spend- 
ing quite a bit of time bringing in 
the basic buttons that let me hook 
into HyperCard’s facilities. I'd find 
myself unable to go Home or with- 
out a menu bar. And I hate memo- 
rizing key combinations. So, I built a 
useful set of buttons that can be 
installed with one click and one 
paste—automatically. It's the Scout- 
ing Toolkit. 


Toolkit Descriptions 

and Behaviors 

Figure 4, page 113, shows the self- 
documenting card the toolkit lives 
on. Figure 5, page 113, identifies the 
15 buttons and two (hidden) text 
fields that make up the domicile 
card's object world. All but one field 
and one button go with the toolkit 
when it travels to new stacks and 
cards. Figure 6, left, details the 12 
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mark other expert system languages, Sierra OPS5 80 — Personal Version plus: 
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system language, interpreted or compiled, 60 = Full Embedability within 
matched our performance! ‘C’ programs 

FLEXIBLE: DEVELOP your expert systems using 40 = Commercial Royalty-free 


the fully integrated workbench environment — 

multiple windows, multi-buffer editor, incremental 
compilation, full tracing and debugging. COMPILE 
your knowledge base to create a stand-alone a oe . 
executable OPS5 program. EMBED multiple O"Opss. ‘opss  Opss OPS/83 Sierra 
independent knowledge bases in your own ‘C’ PC/AT (Forgy) (DEC) PC/AT OPSS5 
programs and call them when and as often as Symbolics VAX PC/AT 
YOU want! 


runtime license 
= 1 year of updates 
» Telephone support 








Shipping & Handling $5.00, $20.00 outside 
US and Canada.Visa/MC/POs/Drafts on U.S. 
banks. MA residents add 5% sales tax. 























RESOURCE EFFICIENT: The runtime libraries Inference 1-800-255-0625 

require as little as 40K! aN : 8 

Requires an IBM PC/XT/AT or compatible with 384K RAM, DOS 2.0 or later. Microsoft C V4.0, OG, Engine + MA 923-099 

V5.0, or QuickC required for external functions or stand-alone program. ee OPS5+/ Technologies 1430 Mass. Ave., Suite 306-1 
Production Syst Tech., IBM/ International Business : 

haa. Ee alec oN Cin, scniobaseameak Inc., DEC/Digital Equip. Corp. Cambridge, MA 02138 
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Unbelievable! 


Creates commented source code and 
listings from memory, COM or EXE files. 


e CLARIFY UNDOCUMENTED 
CODE 


e EASILY MODIFY PROGRAMS 


SOURCER~ creates detailed com- 
mented listings and source code di- 
rectly suitable for assembly. Built in data 
analyzer and simulator resolves mul- 
tiple data segments and provides 
detailed comments on interrupts and 
subfunctions, I/O ports and much more. 
Determines all necessary assembler 
directives. Complete support for 8088 
through 80286, V20/V30, 8087 and 
80287 instruction sets. “We welcome 
comparisons with any other product, 
because no product comes close to the 
ease of use and output clarity of 
SOURCER!” 


PS/2 * AT * XT * PC # Clones 


e CHANGE & ADD FEATURES 
e CLARIFIES BIOS INTERFACES 
e SPECIFIC TO YOUR MACHINE 


The bios pre-processor to SOURCER 
provides the first means to obtain ac- 
curate legal source listings for any bios! 
Identifies entry points with full explana- 
tions. Resolves PS/2’s multiple jumps 
for improved clarity. Provides highly de- 
scriptive data labels such as “video_ 
mode” and “keybd_g_head,” and much 
more. Fully automatic. 


SOURCER 
SOURCER 
w/BIOS Pre-Processor $139.95” 


(“OUTSIDE USA, ADD $15 SHIPPING; CA RES. ADD SALES TAX) 


All our products come with a 30 day 
money back satisfaction guarantee. Not 
copy protected. To order or receive 
additional information just call! 


800-538-8157 x 811 800-672-3470 x 811 
(outside Calif. ) (inside Calif.) 


V COMMUNICATIONS 
3031 Tisch Way, Suite 200, Dept. DD 
San Jose, CA 95128 

(408) 296-4224 


$ 99.95* 


PS/2, AT, XT and PC are trademarks of IBM Corp. 
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TO THE MACS 
(continued from page 115) 


icons used in the buttons. Listing 
One, page 72, gives complete de- 
scriptions and scripts for the card, 
its stack, the buttons, and the fields. 

Installing the toolkit on a new 
card is easy. First, make sure your 
Home card knows where the 
toolkit’s stack lives. Then click on 
button 14. It copies itself to the clip- 
board. Now go to your target stack 
and card, and give a Paste com- 
mand. As ceaselessly mentioned, the 
rest is automatic. 

The toolkit proper contains eight 





major buttons, numbers 5 through 
12. The top four let you toggle vari- 
ous environmental windows. The bot- 
tom four take you to useful places. 
The other toolkit buttons support 
the big eight. 

The whole toolkit folds up and 
disappears if you click in its interior 
outside the buttons. It reinflates 
when you click on its iconic remain- 
der, button 13. 

Like all good organisms, the 
toolkit knows when to fold its tent 
and scoot off into the night. Button 
number 1 removes all traces of the 
toolkit from a card, including itself. 
Snake tail swallowing is one useful 
byproduct of HyperTalk’s ability to 
self-reference. 


Trees Saved As 
Description’s Delayed 
I keep telling Tyler I'll cut down the 
size of these columns and their list- 
ings. And I’m trying. But once again 
I've exceeded my spatial budget. So 
you'll have to wait until next month 
for the remaining discussion of the 
Scouting Toolkit’s objects and their 
operation. 

Of course, Marvel and DC always 
come up with dramatic catch- 
phrase hooks for their continued 


graphic stories. But all I can think of | 


is this small section’s subhead. Who 
ever said comic books ain't superior 
literature? 


Wrap-Up 
_ I've worked without reader feedback 
on these first few columns—fright- 


ening but true. So, if you get a | 


chance and have the interest, drop 


me a note detailing what you want | 
| to see more and less of. 











Next time out, besides the project 
wrap-up: reader mail, Mac Expo, pa- 
rentheses surrender, the Cambridge 
ambience, intelligent pictures, Mi- 
crosoft madness. And, of course, an- 
other code project. See you in 31. 





Availability 

All the source code for articles in 
this issue is available on a single 
disk. To order, send $14.95 to Dr. 
Dobb’s Journal, 501 Galveston Dr., 
Redwood City, CA 94063, or call (415) 
366-3600, ext. 221. Please specify the 
issue number and format (MS-DOS, 
Macintosh, Kaypro). 


DDJ 


(Listing begins on page 72.) 





Vote for your favorite feature/article. 
Circle Reader Service No. 6. 


Vendors 


HFS Navigator 
Think Technologies 
135 South Rd. 
Bedford, MA 01730 
(800) 648-4465 

(617) 275-4800 
Reader Service No. 20 


QUED/M 2.04 
Paragon Concepts Inc. 
4954 Sun Valley Rd. 
Del Mar, CA 92014 
(619) 481-1477 

Reader Service No. 21 


TMON 2.81 

ICOM Simulations Inc. 
646 S. Wheeling Rd. 
Wheeling, IL 60090 
(312) 520-4440 

Reader Service No. 22 
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A DEAL YOU CAN’T REFUSE 


FREE * FREE* Microsoft:C 
Turbo Ce “ QuickC~« $100 REFUND 


. on your present MS C compiler with 
(Borland) (Microsoft) purchase of C Starter or C Business Library 


* If you ALREADY own one, get a FREE REFUND... See special offer. (Limited time offer) 


C WHY YOU CAN’T REFUSE 


A C COMPILER without a good add-on library is like a PC without a keyboard... 
it won’t do what you want it to do. 





GAIN C POWER Add capabilities your compiler library does NOT have. e.a.: 


aw New! Qwick Menuing—tull 1-2-3 like menus & more 
a Flexible powerful windowing + new Qwick windows 
m= Powerful cursor, video and attribute control 


a New! Qwick Data Entry with dialog boxes 
gw Formatted, fully validated data entry 
gw Display default field values 








a 7ime and date arithmetic 
w= Sample code and working examples 


aw Calculator style entry option 
w 500 functions you need 


, SAVE TIME, TIME, TIME: man-years on development, calendar months on schedule! 


-< SAVE MONEY: Lowest Cost, Highest Quality Library/Windows Available! 

aps SMALLER PROGRAM SIZE: your application program can be up to 50% smaller! 

r~ EASY for beginners!) | POWERFUL for professionals! ee 

- : INSTANT INSTALLATION UTILITY included! eS ae Se a Oy, 

Fr i SUPERB DOCUMENTATION: time saving, helpful, clear, complete, instructive. % Paigieg Seon “Mp 
rr: | BUSINESS USERS: FREE 3 machine site license (C Library & Power Windows). bag tee 
eo _ FULL SOURCE CODE! NO ROYALTIES on products you develop. Gs? 


a FREE UTILITY: To convert Turbo Pascal code to C code. 


SAVE MONEY! 


POWER WINDOWS” 
MOST POWERFUL YET 
POP-UP/PULL DOWN/OVERLAP 

Menus/Overlays 
Help Screens 
Messages/Alarms 
ZAP ON/OFF SCREEN 
FILE-WINDOW MANAGEMENT 
Horizontal & Vertical Scrolling 
Word Wrap & Line Insertion 
Cursor/Attributes/Borders 

Many types of menus. Highlighting. 

Move data between files, keyboard. 

program and windows. Status lines 

Change size/location/overlapping. Move/ 

add/delete/cascade windows. 

B CISMBRSS OE SSeS $159.95 


* SPECIAL OFFER 


Free Turbo C or QuickC with purchase of C Starter 
Package, C Business Library, C Function Library or 
Power Windows. Even if you already own Turbo C or 
QuickC, we will refund up to the full purchase price 
of one of these a s with the purchase of C 
Starter Package or C Business Library. 


SAVE TIME! 
SATISFACTION GUARANTEED 





C FUNCTION LIBRARY 
BEST YOU CAN GET 
HUNDREDS OF FUNCTIONS 
FULLY TESTED 
BETTER FUNCTIONS 

Most complete screen handling plus 
graphics, cursor/keyboard/data entry, 72 
string functions with word wrap; status 
and control; utility/ DOS BIOS/time/data 
functions; printer control & more. Special 
Functions. 

TAAGHSKONGS. aa ae Teo $159.95 


C BUSINESS LIBRARY 


INCLUDES C FUNCTION LIBRARY, POWER 
WINDOWS, SUPERFONTS FOR C, B-TREE 
LIBRARY, ISAM 


PUL 46h ees Fe we $299.95 
(A $500.00 VALUE) 


12118 Kimberlev. Houston. TX 77024 
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DON’T WAIT! 


(Direct from Entelekon only) 


713-468-4412 


ORDER NOW! 
CALL (713) 468-4412 





B-TREE LIBRARY & ISAM 
DRIVER 


POWERFUL DATA MANAGER 
FAST! EASTY TO USE! 
16.7 MILLION RECORDS/FILE 
16.7 MILLION KEYS/FILE 
Fixed/Variable length records. 

Fast B-tree indices. Add/remove keys 
Find first/last/next/any key. Find keys by 
Boolean selection. Read/write/delete or 
add records to file. 
Full source. No royalties........ $129.95 
Multi-User option available. 


C STARTER PACKAGE 

INCLUDES C FUNCTION LIBRARY. POWER 

WINDOWS, SUPERFONTS FOR C (20 DISKETTES) 

AL fee. ise eo Sees $199.95 
(A $370.00 VALUE) 


Entclekon 


SINCE 1982 
VISA-MASTERCARD-CHECK-COD 





COLUMNS 


STRUCTURED PROGRAMMING 


Implementing Wirth’s LineDrawing Module 


| his seminal work Programming 
in Modula-2, the venerable Nick- 
laus Wirth, lord of structured pro- 
gramming, proposes a graphics mod- 
ule that he calls LineDrawing. It's 
defined on pages 114-115 of my 
copy, which is the Springer-Verlag 
1982 edition. Although LineDrawing 
lacks the razzle-dazzle of more re- 
cent graphics packages, it’s service- 
able for many applications. Yet 
Modula-2 vendors seem to have by- 
passed it even though they leap at 
everything else Wirth even vaguely 
suggests. Consequently, this 
month's column makes a Valuable 
Contribution by implementing 
LineDrawing and showing some 
ways to use it. 

For this project I tried out a new 
Modula-2 development system from 
Stony Brook Software up in Wilton, 
New Hampshire. I used Version 1.00, 
a level number certain to make any 
serious programmers break out in a 
sweat as cold as the New Hamp- 
shire winter. It’s a command-line 
compiler, which isn’t much fun after 
getting used to Turbo Pascal 4.0’s 
glitzy integrated environment. Also, 
I didn't use the included program 
editor, M2EDIT, because I’m spoiled 
by BRIEF. (If you haven’t tried BRIEF, 
it's like coming to the One True 
Religion.) Still and all, Stony Brook's 
Modula-2 is a terrific compiler. I 
found only one real bug using it for 
this and some other projects: re- 
markable for any new product. It’s 
dazzlingly fast as well, compiling the 
201-line LINEDWG.MOD in five sec- 


by Kent Porter 


onds from Enter to system prompt 
on my 8-MHz AT clone with a 40-ms 
hard disk. 

Lest the previous paragraph leave 
you with the impression that I’m 
just overflowing with praise for all 
and sundry, let me take a whack at 
The Master Himself. Professor Wirth 
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might be the progenitor of struc- 
tured programming languages, but 
he writes stylistically sloppy code. If 
this guy were a student in one of 
my programming classes, I’d drop 
his grade for the lack of comments 
and a tendency to put unrelated 
statements on the same line. Wirth 
gets away with it because he’s Who 
He Is, but that’s no excuse, particu- 
larly in a work that is to Modula-2 
what K & R is to C. And while I’m at 
it, Springer-Verlag gets a hiss for con- 
sistently producing the worst-in- 
dexed books in the computer pub- 
lishing industry. 

So much for congratulations and 
contumely. Let’s get on with it. 


The Line-Drawing Module 

The definition module for LineDraw- 
ing is LINEDWG.DEF in Listing One, 
page 88. With minor _ stylistic 
changes, it adheres faithfully to 
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Figure 1: Output from SIERPIN.MOD, drawn with LineDwg routines 





Wirth's definition. The only altera- 
tion of substance is the name itself; 
LineDrawing doesn't fit into the 
eight characters DOS allows, so I 
shortened it to LineDwsg. 

There's one other change as well. 
In the prototype, Wirth defines a 
procedure called area, which fills a 
rectangular region with a color. But 
elsewhere, in connection with the 
Queens program on pages 58-59 
(which actually calls the procedure), 
he refers to an apparently identical 
process called paint. The latter 
makes more sense, so that’s its 
name in LINEDWG.DEF. 

I chose to implement LineDwg 
using EGA (the IBM Enhanced Graph- 
ics Adapter) mode 10h, which fur- 
nishes 640 X 350-pixel color graph- 
ics. This is somewhat at odds with 
the Wirth model, which proposes 
four gray scales from white (0) to 
black (3), but it makes sense in that 
the EGA is widely available and it 
has decent resolution. Mapping 
Wirth’s color indicators to EGA color 
numbers is easy to do via a CASE 
statement. 

The problem with EGA 640 x 350 
is that the pixels aren’t square. To 
achieve orthogonal integrity on an 
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Five new ways to build 


More Programming Pearls 


better programs. 
And one truly classic way. 


What’s new... 


1 O Algorithms, Second Edition 
e by Robert Sedgewick. 

“Impressive...” said Byte magazine of the first edition. 
Right off the press, this second edition of Algorithms 
gives you the same broad-based coverage and emphasis 
on an intuitive approach to algorithm analysis as the 
extremely successful first edition. 

06673 640 pp. Hardcover $37.75 


, XO Computer Algorithms, Second Edition 
e _ by Sara Baase. 

Several new chapters on modern topics like parallel 
algorithms have been ddded to this edition of our popu- 
lar book. And the solid mathematical analysis and clear, 
accessible style haven't changed one bit! Includes dis- 
cussions of advanced topics like adversary arguments 
for lower bounds, and NP-completeness. 

06035 400 pp. Hardcover $38.75 


3 O Algorithmics: The Spirit of Computing 
e _ by David Harel. 

“\ wonderful introduction to algorithms and complexity 
theory.” (Alfred V. Aho, director of Computing Science 
Research at AT&T Bell Laboratories, Murray Hill, NJ). Here's 
a highly readable account of the most important con- 
cepts, methods, and results fundamental to the science 
of computing. 

19240 423 pp. Paper $24.75 


O Data Structures and C Programs 

« by Christopher Van Wyk. 
Here’s your chance to own a unique book on data 
structures—with examples coded in the C language. 
Van Wyk gives you the “why” and “how” of program 
implementation, and includes only working, tested 
programs as his examples. 
16116 600 pp. Hardcover $40.95 


5 O More Programming Pearls 
« by Jon Bentley. 

Hot off the press! Here's more of the popular columnist's 
“pearls of wisdom,’ written to explore, teach, and enter- 
tain. Shows you how creativity and insight in computer 
programming can be applied practically in engineering. 
11889 224pp. Paper $16.25 


What’s classic... 


The Art of Computer Programming 

by Donald E. Knuth. 

0 Volume I: Fundamental 
Algorithms, Second Edition. 

03809 643 pp. Hardcover $45.25 


O Volume II: Seminumerical 
Algorithms, Second Edition. 
03822 200pp. Hardcover $45.25 


CO Volume III: Sorting and Searching 1] poe 
03803 722pp. Hardcover $45.25 





TO ORDER: Simply check off the books that interest you, tear out this ad and send a check for the total, plus your local sales tax, to: ie 
Dept. DM, Addison-Wesley Publishing Co., 1 Jacob Way, Reading, MA 01867. Or call the order dept. at the number below and give the 5-digit 


code at the bottom of this ad. 


vv Addison-Wesley Publishing Company 
Reading, Massachusetts 01867 * (617) 944-3700 


We publish the leaders. 16039 
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The West Coast Computer Faire 
announces the first 
Computer Matchmaking Service. 


Y:: won't have to depend on fate at the The West Coast Computer Faire has 
13th West Coast Computer Faire to find the made and will make more matches than any 
products and services that are the perfect another computer show. It’s time we made the 
match for your needs. perfect match for you. 


We start you out on your path to high- 
tech bliss with Vertical Market Matching. 
We bring in the companies selling quality 
computers, software, peripherals, and add- 
ons—companies that meet the needs of peo- 
ple involved in specific business segments 
such as finance, medicine, manufacturing, law, 
education, engineering, and construction. 
And our Product Matching makes it 
easy for you to find the software, add-ons and 
upgrades for the Commodore Amiga, Apple II 
or Macintosh, IBM PC/MS-DOS, 
IBM PS/2, Atari, Lotus and more, 
that will keep you happily gazing 
into your current system’s eyes. 
Plus, we counsel you on the latest 
techniques and insights in our a 
outstanding Conference sessions. 


Match your interests with these Faire 

Features: 

¢ Computer Art Gallery 

* Computer Faire Networks 

* Computer Music Demo 

¢ Computer-Aided Special Effects Demo 

¢ Exhibitor Presentations 

e Free Hands-On Classes, including Desktop 
Publishing, MS-DOS, Word Processing, Lotus 
1-2-3 















The West Coast Computer Faire, Moscone 
Center, San Francisco, CA, April 7-10, 1988 


For information on exhibiting, call 
617-449-6600, x5077. But hurry — the 
Faire’s floor is almost full! 


Looe 


Fill out this coupon and mail with your check(s), for $15.00 for each registrant, postmarked by March 17th, 


1988. Include the names and addresses of registrants for whom you are enclosing a check. (Photocopy coupon for 
additional registrants.) 


Name Title 








| 

| 

| 

| Company 
| Address 
| 

| 

| 

| 








City Sent oe Bip 
Prete (ee) 











Four day conference and exhibits $15.00 in advance. $20.00 at the door Make check payable to ‘“‘The West 
Coast Computer Faire.’’ Mail to: Attendee Registration Department, The West Coast Computer Faire, 300 First 
Avenue, Needham, MA 02194. Advanced registrations accepted only with full payment and each registrant’s name 
and address. Tickets will be mailed to each individual registrant separately. 


THE 13 WEST COAST 


MUP WINER) MASORIE April 7-10, 1988, Moscone Center, San Francisco, CA 
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STRUCTURED PROGRAMMING 
(continued from page 118) 


IBM PC display, the y dimension 
should be 75 percent of the x. The 
EGA resolution yields 53.8 percent 
of x, so everything is taller than it 
should be. Because Wirth’s line-draw- 
ing procedure works in increments 
of 45 degrees, he obviously had 
square pixels in mind. 

The solution is to use a virtual- 
coordinate space to represent the 
display. In virtual space, the screen 
can be 800 X600 pixels, and follow- 
ing the Cartesian convention, the 
origin (coordinates [0,0]) can be at 
the lower-left corner with y ascend- 
ing upward. Because the virtual 
range is larger than the device range, 
rounding off tends to jam pixels 
together, thus producing visual ob- 
jects without gaps. The opposite ef- 
fect—gapping—occurs when the vir- 
tual range is smaller than the physi- 
cal, as in 400 X 300 pixels mapped to 
a 640 X350-pixel display. In both 
cases you get jaggies, but jaggies are 
an inevitable feature of the com- 
puter graphics landscape. Fortu- 
nately, they’re not glaringly apparent 
with the EGA. 

Mapping virtual coordinates into 
physical space is relatively simple. 
The program works entirely within 
the virtual range, and only the out- 
put functions “know” that the coor- 
dinate system is a myth. The func- 
tional procedures devX and devY in 
Listing Two (the LineDwg implemen- 
tation), page 88, perform virtual-to- 
physical translations based on fac- 
tors computed during the module's 
initialization phase. These functions 
are called when writing pixels to the 
device. The only procedure exempt 
from virtual addressing is writePixel, 
which works entirely in device 
space. 

Perhaps one reason why LineDraw- 
ing has not been implemented else- 
where is that Wirth’s thoughts on 
the subject seem to be incomplete. 
For example, he formulates the 
PaintMode enumeration as a control 
for the paint and copy routines, yet 
none of the calls ever touches it. 
Consequently, it’s set here to re- 
place and never changed, and the 
routines don't refer to it. Likewise 
the matter of color inheritance is 
unresolved. The paint and dot proce- 
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Essential Graphics Takes You 
To New Heights Of Graphic 
Programming In C. 

Increases Speed 40%. 


When first brainstorming this ad I spent a 
considerable amount of time trying to 
determine what graphic image to use as an 
illustration. The Space Shuttle, Mona Lisa, 
Robo-Cop - there are so many available. 


Then it occurred to me. When you have the 
fastest, smallest functions, it’s really 
irrelevant to show a complicated graphic 
image. It would be as if thinking up a sexy 
graphic were the test of a library. 


The Graphics Test 


The crucial test of a professional graphics 
package is: are the functions powerful, 
reliable, fast, and do they truly eliminate 
grunt work? 


How quickly the functions execute is the 
criterion most people look for in a graphics 
library. There is no sense paying for a 
package that is not up to speed. 


Beware Of Speed Traps 


We eliminate the bios calls and write 
directly to the graphics card. As a matter of 
fact, in a recent benchmark, we were clocked 
40% faster then our nearest competition. 


I'd like to repeat that “...clocked 40% 
faster than our NEAREST competition.” 
Please take a moment to think about the sig- 
nificance of that speed increase in the project 
you are contemplating or working on now. 


Our efficient, granular coding provides you 
with code sizes up to 75% smaller. Lean, fast 
and tight - just the way you would have done 
it yourself. 


Power Packed Pixels In Every 
Package 


There has always been a trade-off in this 
industry between ease of use and power. Our 
functions do not require a lot of setups, are 
well-documented, and most of all, thor- 


oughly debugged. Essential Graphics' ease of 


use stems from our thoughtfulness and not 
from a lack of power. We explain what we 
are doing every step of the way. Our support 
staff consists of the humans who wrote the 
functions, so we are thoroughly prepared to 
assist you after the purchase. 


Essential Graphics is a trademark of Essential Software 


Graphics 





Caveat Emptor 


Make no mistake, this is not a package for 
the “draw a box around the total field” 
crowd. This library was designed to help the 
professional C programmer make money 
and look good. 


We’ ve included a complete set of “rubber- 
banding” functions. One of the most welcome 
features is the ability to save/restore images in 
PC Paintbrush format or bit image. World 
coordinates and view ports aid in program- 
ming portability. 


We include the ability to manipulate and 
rotate character fonts and symbols. You can 
place characters and symbols anywhere on 
the screen, and use up to eight fonts at one 
time. 


Yours, Mine, Ours 


We don’t consider ourselves equity partners 
in your business and therefore we do not 
charge any royalties or run time fees. We 
think your efforts belong to you. If for any 
reason you are unsatisfied with our product 
you may return it within 30 days for a full 
refund. Full source is available. Please call 
today and launch yourself into the world of 
power graphics. 


Price $299 - Source $299 














Adaptors include - CGA, EGA, VGA, 
MCGA, ATT, ATT DEB, Hercules, Vega 
Deluxe, Paradise Autoswitch. Printer 
Support - IBM, Epson, Oki, TI, Alps, 
Panosonic, and others. Supports mice, 
light pens, plotters, color printers. 
Compilers-Microsoft, Lattice and Turbo-C 


Other Essential Products Include: 
ScreenStar - Essential Communications 
and Utilities -- /*resident_C*/ - Please call 
for further information 201-762-6965. 





a To Order Call: 
arm 201-762-6965 





Essential Software, Inc. 


South Orange Plaza 
76 S. Orange Ave., Suite 3 
South Orange, N J., 07079 
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STRUCTURED PROGRAMMING 
(continued from page 121) 


dures accept a color parameter, but 
what color applies to line? I opted 
for a ‘last color used prevails” strat- 
egy. The color variable, global to the 
implementation module but not ex- 
ternally visible, forces the next line 
to inherit the color of the most re- 
cently written pixel. 

Wirth’s approach emulates turtle 
graphics by employing the concept 
of a graphics pen that draws a line 
as it moves, and any activity causes 
the pen to come to rest at the last 
pixel written. You can see this idea 
at work by examining the line proce- 
dure. Px and Py are externally visible 
virtual coordinates giving the pen’s 
position. Line advances them before 
writing each pixel so that, when the 
line is completed, they reflect the 
location of the most recent pixel. A 
pen-up motion is effected by chang- 
ing the values of Px and Py; the 
turtle instantly moves without draw- 
ing. The same end results from writ- 
ing a black pixel (color 3) to a nonse- 
quential location via a call to dot. 


Easy to C 


with THE C WORKSHOP 


- Interactive software teaches C 

¢ Feedback guides you through 100+ 
program exercises 

¢ Standard “K&R” C compiler for exercises 
and your own programs up to 64K 

¢ Study at your own pace 

¢ Thorough from start to finish: pointers, 
structures, trees, etc. 

¢« Compatible with all major C compilers 

- Includes 384-page book fully coordinated 





Figure 2: Output from SPIRAL.MOD (Listing Four) 
y = cos x + sin 2x 





Figure 3: Photo of MathPlot’s output 


Now in" C" fii 


Two and Three Dimensional Geometry 
The added plus you need for developing sophisticated 
computer graphics,;CAD,and programs that use compu- 
tational geometry. Y 
You save time and 
money with its 
flexibility. 


TurboGeometry 
e 
An excellent addi- Lib r a r y 
tion to Borland's 
Turbo Graphix 
Tool Box. 
Over 150 ready to use two & three dimensional 
routines, such as Geometric Equations « Intersections « 
Curves « Arcs « Circles « Lines * 2&3 Dimensional 
Transforms « Polygons « Hidden Lines « Volumes » 
Perspectives * Clipping *» Areas and many more 
Manual, full source code and sample programs. Only 
$99.95US. Add $5.00 for S&H in US. TexRes add 8% 


with tutorial 
¢ A split-screen editor, too! 
¢ More effective than book and compiler, 
video, or seminar 
“Extremely well-done package” (William Zach- 
mann, ComputerWorld). Join the thousands of 
people who’ve discovered the C Workshop. 


Satisfaction Guaranteed 


ST. 30 day guarentee. VISA,MC,MO,Chk PC(Comp), 
Turbo Pascal 2.0+,4.0,&C. DOS 2.0+. When ordering, 
indicate language. ORDER YOUR LIBRARY TODAY!! 


DISK SOFTWARE, INC., 2116 E. Arapaho, #487 


Richardson, Texas 75081 (214) 423-7288 
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or return in 30 days for refund. To order your own 
C WORKSHOP, call toll-free (800) 888-0852 ext. 
955 day or night (Visa/MC/AmEx). Or send check 
to Wordcraft, 3827 Penniman Av, Oakland, CA 
94619. $69.95 plus $5.00 shipping (Priority Mail). 
In CA, add $4.90 sales tax. 

For IBM PC compatibles, uses 220K RAM. 
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Why We're Betting — 
a Million Lines of Gode on 
the SAS/G Compiler. 





At SAS Institute Inc., we’ve invested And when we combined these OS or CMS, for a free 30-day evalua- 
more than 10 years of research—and _ features with outstanding technical tion. We'll also send you a free copy 
over a million lines of code—in the Support and frequent updates —both of a leading benchmark program. Com- 
SAS® System, the world’s leading data provided free—software developers pare our compiler with any other. Odds 
analysis software. So you can bet we everywhere took notice. The SAS/C are, you'll choose the SAS/C compiler. 
left nothing to chance when we chose _ compiler is now the market leader, Just mail the coupon below. Or call 
the C language for the next generation _installed in hundreds of commercial your Software Sales Representative at 
of our software. firms and academic institutions. (919) 467-8000. 


We selected C for the portability it 
would bring to the SAS System, but Test It Compare It 


weren't about to risk our code on just 


any mainframe C compiler. So we tried FREE for 30 Days. 


them all. When none could meet our 








SAS Institute Inc. 

pen oe ae Peer We're betting you've set the same _ ean Oe ae 
high standards. That's why we'd like Phone (919) 467-8000 

We Developed It. to send you the SAS/C compiler, under ® Fax (919) 469-3737 
Support it. Use. It. Use It. Using a C version of the 
The SAS/C compiler set new standards re. Sie teenie BOTA arian eee 
for efficiency and technical quality, with: — release produces the fastest 
w= A source-level debugger that code among the top 3 
includes structure display, ABEND mainframe compilers. It even 
recovery, and debugger |/0 exits for tops our own previous | saszc 3.01 
debugging specialized applications release by 35%. | waterioo 
=== Reentrant object code ra 
was Highly optimized generated code | Se ne er 
=== se of standard IBM linkage js tek Swe ali nb Bi naked e aL e i 
conventions, with support for 31-bit 
addressing 
w= A CMS Rexx/TSO CLIST interface: 
== Support for signal handling : ['d like to put the SAS/C™ compiler to the test with a free 30-day trial, and 
including program checks and terminal : My free copy of the Dhrystone benchmark program. Give me the details. 


interrupts, and non-standard signals 


aaa Please complete, or attach your business card. 
such as timer interrupts and stack 


overflow Bg 
=== Many built-in functions including Scher ts Oe SON TS a ee 
string handling TR ees ous cee nk 
== in-line assembler. - Address 

ee Te ee ee ide a a ie oe Ne 

- City State ZIP 

Telephone 

SAS is a registered trademark of SAS Institute Inc., : 
Cary, NC, USA. SASIC is a trademark of SAS Institute. : Mail to: SAS Institute Inc., Attn: CC, SAS Circle, Box 8000, 
Copyright © 1987 by SAS Institute Inc. Cary, NC, USA, 27512-8000 
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STRUCTURED PROGRAMMING 
(continued from page 122) 





The line routine in LineDwg is 
quite limited. It draws in direction d 
for n units from the current pen 
location. The direction indicator d is 
a digit 0..7 expressing a multiple of 
45 degrees such that 0 draws to the 
right, 1 to the northeast, 2 straight 
up, and so on. To draw lines at 
unpredictable angles, it’s necessary 
to develop your own routine outside 
LineDwg; it should call the dot pro- 
cedure for output because dot maps 
virtual coordinates into the physical 
space. 





















than simply clear the screen, but it’s 
consistent with Wirth’s ideas. On 
the IBM PC, any mode change clears 
the display, even if you switch to the 
same mode that’s currently active. 
Wirth’s demonstration programs in- 
evitably begin with clear in lieu of 
initiating a graphics mode, so the 
implemented clear procedure puts 
the display into graphics. In the ab- 
sence of indications otherwise, clear 
also establishes white as the default 
color. Wirth never calls clear again 
after the start of the run, but your 
programs can call it any number of 
times to reset the display without 


Microsoft. University 
offers the only systems 
training straight from 


the source. 


Microsoft University courses take you to the heart of our 
microcomputer software architecture. Our systems software 
curriculum combines in-depth technical presentations, 
problem-solving sessions, and practical hands-on workshops. 


Microsoft University Spring Quarter 


MSe OS/2 Programming Environment (4 days) 
MS OS/2 Applications Programming (5 days) 
MS OS/2 Device Drivers (4 days) 


$1000 
$1250 
$1000 


MS OS/2 LAN Manager Programming Environment (4 days) $1000 


Microsoft Windows Programming Environment (5 days) 
Microsoft Windows Applications Programming (5 days) 
Programming in Microsoft C (5 days) 


$1000 
$1250 
$1000 


Courses held in both East and West Coast cities. 


APRIL 1988 SCHEDULE 
Week of: April 4 


BOSTON 
MAY 1988 SCHEDULE 


Week of: May 2 May 9 
SEATTLE A,CE A,B,G 


BOSTON F A 
JUNE 1988 SCHEDULE 
Week of: June 6 
SEATTLE A,E A,B 
BOSTON D B 


Tuition is per person and includes 
all course materials, 


April 11 
SEATTLE A CEG 


June 13 


April 18 April 25 
A,F,E B,G 
G E 


May 16 May 23 
B,E Pig 
B C 


June 20 June 27 
E E,F,G 
G D 


Call the Microsoft University Registrar 
and use your credit card to enroll now. 


(206) 882-8080. 
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The clear procedure does more 





leaving graphics mode. 


Using the Module 

From the standpoint of the PC, 
Wirth’s programs are inconsiderate 
because they leave the machine in 
graphics mode on exit. Obviously he 
doesn't program on a PC, or he'd 
have included the switch back to 
text that precedes the termination 
of Listing Three, page 90. 

This program, called SIER- 
PIN.MOD, is included here as a test 
to make sure the graphics functions 
work as expected. Wirth’s book 
shows the output of the program, 
which is based on a mutually recur- 
sive graphics algorithm developed 
by the Polish mathematician Sier- 
pinski. The only changes from the 
Wirth model are the addition of the 
switch back to 80%X25-pixel color 
text at the end and removal of su- 
perfluous Read statement from the 
REPEAT...UNTIL loop. The output 
of the program (to my astonishment, 
it ran correctly the first time) ap- 
pears in Figure 1, page 118. 

The paint procedure fills a rectan- 
gular area with the specified gray 
scale. The origin of the area is at (x, 
y), extending right for w units and 
up for A units, expressed in virtual 
coordinates. This routine is inter- 
nally optimized to prevent rewriting 
pixels that physically coincide as a 
result of mapping round-offs. Even 
so, because it’s based on ROM BIOS 
interrupt 10h, it’s agonizingly slow. 
Much greater efficiency could be 
achieved by manipulating the EGA 
registers directly. I chose not to in 
the interest of limiting the scope of 
this project; the EGA is a whole big 
subject of its own. 

The copyArea procedure also uses 
the ROM BIOS and is similarly poky 
in performance, even though—like 
paint—it's internally optimized to 
operate at the physical pixel level. 
This routine copies part of the 
screen to another location. The 
source is at (sx, sy) and the destina- 
tion at (dx, dy), the copied area be- 
ing dw virtual units wide by dh units 
high. You'll see it in operation a 
little later. 

The two text routines in LineDwg 
are Write and WriteString, which 
parallel similarly named procedures 
in Modula-2’s standard InOut mod- 





ule. The difference is that they start 
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SUDDENLY, MAGIC PC 
MAKES YOUR DBMS OBSOLETE 


i. Groat pes decease applications are created — by hacking out 
line after line of time-consuming code. Most DBMS’ and 4GL’s give 
you some programming power. But when it comes to serious applica- 
tions, they keep you bolted to your seat writing mountains of tedious 
code. And rewriting it all over again with every design change. 

Imagine how much faster you'd be if you could replace the painful 
coding phase with an innovative visual technology which takes only a 
fraction of the time: Introducing Magic PC—the revolutionary Visual 
Database Language from Aker Corporation: 


e High-Speed Programming: 

With Magic PC’s visual design language you quickly describe your 
programs in non-procedural Execution Tables. They contain compact 
programming operations which are executed by Magic PC’s runtime 
engine. You fill-in the tables using a visual interface driven by windows 
and point-and-shoot menus. One table with 50 operations eliminates 
writing more than 500 traditional lines of code. Yet with Magic PC you 
don’t sacrifice any power or flexibility. 


mE te 
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With a powerful set of high-level non-procedural operations you 
program at only a fraction of the time. 


¢ Maximum Power AND Simplicity: 

With Magic PC, you can generate robust DBMS applications includ- 
ing screens, windows, menus, reports, forms, import/export, and much 
more! Plus, Magic PC has one of the friendliest user interfaces you’ve 
ever seen. Using Magic PC you can look-up and transfer data through 
a powerful Zoom Window system. Magic PC even lets you perform 
command-free queries. 


e Btrieve Performance: 

Magic PC incorporates Btrieve, the high- performance file manager 
from SoftCraft. This gives you exceptional access speed, extended data 
dictionary capabilities, and automatic file recovery! 


¢ Virtually Maintenance-Free: 

With Magic PC you can modify your application design “on the fly’ 
without any manual maintenance. Magic PC automatically updates 
your programs and data files on-line! This also makes Magic PC an 
ideal tool for prototyping complete applications in hours instead of days. 


e FREE Networking: 

Magic PC comes complete with LAN features. Develop multi- user 
applications for your LAN with Magic's file and record- locking 
security levels. 


e Stand-Along Runtime: 
Distribute your applications and protect your design with Magic PC’s 
low cost runtime engine. 


e All For Only $199: 

Best of all, Magic PC is an unbeatable bargain. For a limited 
time, Magic PC’s price has been reduced to only $199! Yes, this is 
the same Magic PC that normally lists for $695! And Magic PC 
eliminates the need for a separate DBMS, compiler, or applica- 
tion generator. It comes complete with all the tools you need 
to develop your own database applications instantly. 









‘‘Magic PC’s data base engine delivers powerful 
applications in a fraction of the time. . . there is 
truly no competitive product:’ 

Victor Wright — PC Tech Journal 


Order Ho 99 Customer No 99999 
Order Date 30/9098 


Item List , 


scription 


In Stock -999,999 
Total Orders -999,999 
Avail to Sell -999,.999 





Pop-up Zoom Windows run multiple programs per screen — with 
point-and-shoot data transfer between windows! 


¢ $199 — With A Money-Back Guarantee! 
For a limited time, you can get Magic PC for only $199. 
And even at this low price, Magic PC is risk-free. If you’re not 
completely satisfied, simply return it within 30 days and we'll 
buy it back (less $19.95 restocking fee). And if you’d like a 
preview, Magic PC’s Tutorial Demo is available for just $19.95. 
But you'd better hurry — Magic PC’s special $199 price 
won’t last long! 
¢ Join The Magic PC Revolution 
To unleash your DBMS design power, order your $199 copy of 
Magic PC right now by calling toll-free or returning the coupon below 


ORDER NOW: CALL 


(800) 345-MAGIC 
In CA (714) 250-1718 


MAGIC PC gam 


eae) ee 
The |f Database Language 


by = 







Yes! I want 
to generate powerful \ 
applications much faster! ; 
CO Rush me my copy of Magic PC at the special promotional price | 
of $199 (add $10 P&H, and tax in CA Intemational orders add 
$30). I understand I can return Magic PC for a refund within 30 
days, if I’m not completely satisfied. * 
C) Rush me a copy of Magic PC Tutorial Demo at $19.95 (add $5 | 
| 
| 
| 
] 
| 


P&H, and tax in CA International orders add $15). 





ame 

CII racket nccertieins PIOHIE 

Sweet Address (no POB) 
Cty ______.. State Zip 5 
© Check enclosed Charge to my: () Maza CI secon 





System requirements: IBM PC, XT, AT, PS/2 or 100% compatible with 512K RAM, hard disk and DOS 
2.0 or later. 5!” format, not copy protected. Dealer pricing available. * Retum policy valid in US only. 
Aker, Magic PC, The Visual Database Language are trademarks of Aker Corporation. All other 
trademarks acknowledged. © Copyright 1987, Aker Corp. 


UNLEASH YOUR 80386! 





Your 80386-based PC should run two to 
three times as fast as your old AT. This 
speed-up is primarily due to the doubl- 
ing of the clock speed from 8 to 16 MHz. 
The new MicroWay products discussed 
below take advantage of the real power 
of your 80386, which is actually 4 to 16 
times that of the old AT! These new pro- 
ducts take advantage of the 32 bit regis- 
ters and data bus of the 80386 and the 
Weitek 1167 numeric coprocessor chip 
set. They include a family of MicroWay 


mW1167 Numeric 
Coprocessor Board 





MicroWay 80386 Compilers 


NDP Fortran-386 and NDP C-386 are globally 
optimizing 80386 native code compilers that 
support a number of Numeric Data Processors, 
including the 80287, 80387 and mW1 167. They 
generate mainframe quality optimized code and 
are syntactically and operationally compatible to 
the Berkeley 4.2 Unix f77 and PCC compilers. 
MS-DOS specific extensions have been added 
where necessary to make it easy to port pro- 
grams written with Microsoft C or Fortran and 
R/M Fortran. 

The compilers are presently available in two 
formats: Microport Unix 5.3 or MS-DOS as ex- 
tended by the Phar Lap Tools. MicroWay will port 
them to other 80386 operating systems such as 
OS/2 as the need arises and as 80386 versions 
become available. 

The key to addressing more than 640 kbytes 
is the use of 32-bit integers to address arrays. 
NDP Fortran-386 generates 32-bit code which 
executes 3 to 8 times faster than the current 
generation of 16-bit compilers. There are three 
elements each of which contributes a factor of 2 
to this speed increase: very efficient use of 
80386 registers to store 32-bit entities, the use of 
inline 32-bit arithmetic instead of library calls, 
and a doubling in the effective utilization of the 
system data bus. 

An example of the benefit of excellent codeisa 
32-bit matrix multiply. In this benchmark an NDP 
Fortran-386 program is run against the same 
program compiled with a 16-bit Fortran. Both 
programs were run on the same 80386 system. 
However, the 32-bit code ran 7.5 times faster 
than the 16-bit code, and 58.5 times faster than 
the 16-bit code executing on an IBM PC. 

NDP FORTRAN-386™ ..............- $595 
PO CRO ob avee seca ddscecineusiles $595 





80386 compilers that run in protected 
mode and numeric coprocessor cards 
that utilize the Weitek technology. 

The benefits of our new technol- 
ogies include: 
e An increase in addressable memory 
from 640K to 4 gigabytes using MS- 
DOS or Unix. 
e A 12 fold increase in the speed of 32 bit 
integer arithmetic. 
e A 4 to 16 fold increase in floating point 


MicroWay Numerics 


The mW1167™ is a MicroWay designed high 
speed numeric coprocessor that works with the 
80386. It plugs into a 121 pin “Weitek” socket 
that is actually a super set of the 80387. This soc- 
ket is available on a number of motherboards 
and accelerators including the AT&T 6386, 
Tandy 4000, Compag 386/20, Hewlett Packard 
RS/20 and MicroWay Number Smasher 386. It 
combines the 64-bit Weitek 1163/64 floating 
point multiplier/adder with a Weitek/Intel de- 
signed “glue chip”. The mW1167™ runs at 3.6 
MegaWhetstones (compiled with NDP Fortran- 
386) which is a factor of 16 faster than an AT and 


2 to 4 times faster than an 80387. 
mW1167 16 MHz.............0-05: $1495 
mW1167 20 MHz............-s005: $1995 


Monoputer™ - The INMOS T800-20 Trans- 
puter is a 32-bit computer on a chip that features 
a built-in floating point coprocessor. The T800 
can be used to build arbitrarily large parallel pro- 
cessing machines. The Monoputer comes with 
either the 20 MHz T800 or the T414 (a T800 
without the NDP) and includes 2 megabytes of 
processor memory. Transputer language sup- 
port from MicroWay includes Occam, C, Fortran, 
Pascal and Prolog. 

Monoputer T414-20 with 2 meg’ ...$1495 
Monoputer T800-20 with 2 meg’ ...$1995 


Quadputer™ can be purchased with 2, 3 or 4 
transputers each of which has 1 or 4 megabytes 
of memory. Quadputers can be cabled together 
to build arbitrarily fast parallel processing 
systems that are as fast or faster than today’s 
mainframes. A single T800 is as fast as an 
80386/mW1 167 combination! 

Biputer™ T800/T41 4 with 2 meg’... .$3495 
Quadputer 4 T414-20 with 4 meg’ ...$6000 
1Includes Occam 


speed over the 80387/80287 numeric 
coprocessors. 

Equally important, whichever Micro- 
Way product you choose, you can be 
assured of the same excellent pre- and 
post-sales support that has made Micro- 
Way the world leader in PC numerics 
and high performance PC upgrades. 
For more information, please call the 
Technical Support Department at 

617-746-7341 
After July 1988 call 508-746-7341 


MicroWay* 
80386 Support 


80386 Multi-User Solutions 


AT8™ - This intelligent serial controller series is 
designed to handle 4 to 16 users in a Xenix or 
Unix environment with as little as 3% degrada- 
tion in speed. Ithas been tested and approved by 
Compaa, Intel, NCR, Zenith, and the Department 
of Defense for use in high performance 80286 
and 80386 Xenix or Unix based multi-user 


systems. 

Pie = FRIIS isk ds Sect e ieee deen ee $795 
ATS - Susers...... ccc cece eccenceees $995 
AT16 - 16 users ..........cccceeees $1295 


Phar Lap™ created the first tools that make it 
possible to develop 80386 applications which 
run under MS-DOS yet take advantage of the full 
power of the 80386. These include an 80386 
monitor/loader that runs the 80386 in protected 
linear address mode, an assembler, linker and 
debugger. These tools are required for the MS- 
DOS version of the MicroWay NDP Compilers. 


Pier LA) TOG on oin onan sade ce den oe $495 
PC/AT ACCELERATORS 

287Turbo-10 10 MHZ............000: $450 
287Turbo-12 12 MHz.............206: $550 
287 TurboPius-12 12 MHz ........... $629 
FASTCACHE-286 9 MHz ............ $299 
FASTCACHE-286 12 MHz........... $399 
SUPERCACHE-286 ................. $499 
MATH COPROCESSORS 

80387-20 20 MHz................... $895 
80387-16 16 MHZ...........cc0000e. $495 
80287-10 10 MHZz.............20000: $349 
SUZOT-O BS oo cic ciecccc cccee eves $259 
GO2B7-6 6 NOAZ occ ccc ce cnerscces $179 
SET 9 UE nw nis od pin 0 Wels orereince whale $154 
Gs DEEL ach ipinduscddaceraceees les $99 


The World Leader in PC Numerics 

P.O. Box 79, Kingston, Mass. 02364 USA (617) 746-7341 
32 High St.,, Kingston-Upon-Thames, U.K., 01-541-5466 
St. Leonards, NSW, Australia 02-439-8400 
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STRUCTURED PROGRAMMING 
(continued from page 124) 


writing at the current pen position— 
well, near it, anyway. This implemen- 
tation uses the default EGA charac- 
ter set rather than a stroked font, so 
it places the text cursor— 
hence the first character—in the 
8 X 14 physical cell occupied by the 
pen. That's as close as you can get 
with the built-in characters, and it 
should be good enough for most 
applications. The foundation routine 
is Write, which outputs a single char- 
acter and advances the pen. Write- 
String merely calls Write for each 
character in the string. 

This is where the bug in Stony 
Brook Modula-2 popped up. It’s un- 
clear what’s wrong, but literals 
passed as parameters to WriteString 
sometimes show up with a garbage 
character appended to the end. 
Either the compiler isn’t placing a 
null terminator in literals, or else 
the Length procedure has a glitch. 
Through trial and error, I discovered 
that an extra space at the end of the 
literal makes the problem go away 
sometimes, and other times taking 
that padding space out has the 
same effect. This is a bug in the 
category of an annoyance and 
hardly a major flaw. 

The SPIRAL.MOD program in List- 
ing Four, page 92, exercises all direc- 
tions of line, plus copyArea and the 
text-writing routines. Though a 
small program, it runs for quite a 
while because of the inefficiency of 
ROM BIOS calls, two of which are 
made for each pixel copied to the 
outlined window at the right side of 
the screen. The figure copied is a 
portion of the spiral pattern; Figure 
2, page 122, shows the final screen. 

These two demonstration pro- 
grams are nice to look at, especially 
the interesting Sierpinski curve, but 
they have no practical value. For 
that reason, I've thrown in MATH- 
PLOT.MOD (Listing Five, page 93) to 
illustrate a more useful application 
of Wirth’s LineDrawing module. This 
program plots the function y = cos 
x + sin 2x, which is representative 
of any number of mathematical 
graphing applications in both busi- 
ness and scientific programming. 

MathPlot draws three curves in 
different gray scales using the dot 
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The C Programmer's Assistant 


™ 


C TOOLSET © 


Unix-like Utilities for 
Managing C Source Code 


No C programmer should be with- 
out an assistant. C ToolSet provides 
you with the support you need to 
make C programming easier. 

All of the utilities are tailored to 
the C language but you can modify 
them to work with other languages 
as well. 

Source code in standard K&R C 
is included. You are welcome to use 
it with any compiler (UNIX com- 
patible) and operating system you 
choose. 

The documentation contains de- 
scriptions of each program, a listing 
of program options, and a sample 
run. On-line help responds to -? on 


12 Time Savers 


DIFF - Compare files line by line; 
use CMP to compare byte by byte. 
GREP - Regular expression search. 
FCHART - Trace the flow of control 
between large program modules. 
PP - Format C program files so they 
are easier to read. 

CUTIL - General purpose file filter. 
CCREF - Cross reference variables. 
CBC (curly brace checker) - Check 
for pairing of curly braces, parens, 
quotes, and comments. 

Other utilities include DOCMAKE, 
ASCII, NOCOM, AND PRINT. 
Requires MSDOS and 12K RAM 


MONEYBACK GUARANTEE 
Try C ToolSet ($95) for 30 days — 





MicroEdge 


the command line with a list of 
options 


ZN The 
(@) Coder’s 


if not satisfied get a full refund. 


Call (800) 255-4659 


In MA (617) 331-0800 


Source™ 541-D Main St., Suite 412, So. Weymouth, MA 02190 
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Before the SLICK editor was written, we evaluated many 
programmers’ editors. All the editors had some features that were 
good. However, none seemed to stand out as being the one that 


has itall. SLICK IS IT NOWI!! 


*Emacs-style & SLICK macros 

* Run programs concurrently 

* Line, block and char marks 

* Edit first/last page without 
loading entire file 

* Regular expression searching 

* Window and file rings 

* File backup and listing 

* Command retrieval 

*Unlimited filesize 

* Better word wrap 


only $99 


Box 2367 
Fairfax, VA 22031 


* Compiles 24,000 lines/minute 
* Rexx-like macro language 

* Floating point math 

* Add marked expressions 

* Hex, octal, and decimal math 

* Linting 

* Automatic macro make 

* Complete on-line help 

* Syntax expansion/indenting 

* 30 day money -back guarantee 


CALL (703) 378-4716 
Runs on IBM PC/XT/AT ‘ 
or compatible 
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STRUCTURED PROGRAMMING 
(continued from page 127) 


routine. Dark gray follows sin 2x, 
light gray plots cos x, and white is 
the curve deriving from their sum, 
where 0< x <10. Thus the curves 
go slightly beyond x = 3m, tracing 
the function through a bit more 
than 1.5 circles. The vertical grid 
lines delineate intervals of 27, and 
the horizontal grids indicate unity 
on either side of the x axis, giving 
visual reference points for the 
curves. The photo in Figure 3, page 
122, doesn't do it justice. This is a 
handsome display that you have to 





see on an EGA screen to appreciate 
the usefulness and elegance of the 
gray-scale plots produced by Wirth’'s 
LineDrawing module. 


Stony Brook’s Modula-2 

This experience with Stony Brook's 
Modula-2 sold me on the product. 
Guys like me, writing for several com- 
puter magazines and on a ffirst- 
name basis with the Fed Ex man 
because he brings so many review 
copies, tend to get jaded. It’s hard 
to work up enthusiasm over yet an- 
other new product in an industry 
that sprouts them like weeds on a 
vacant lot. So praise doesn’t come 


GET A FLAME 


The Blue Flame II is the latest in our line of very high-perfor- 
mance disk emulators for PC’s, XT’s, AT’s, '386’s, and all 
clones. It’s extremely fast: 800Kbytes per second transfer 
rate, ten times faster than hard disks. Even faster than IBM’s 
VDISK program! And big: Up to 8 megabytes per board, 32 
megabytes per logical drive. Much bigger than extended or 
expanded memory. It doesn’t waste any of your computer’s 
memory address space for storage. And the Blue FLame Ilis 
reliable: With no moving parts, it can be accessed continu- 
ously for years with no failures. Don’t try this at home with 


your hard disk! 


Not just another RAMdisk, the Blue Flame II has an external 
AC-powered battery-backup option: Data isn’t lost when the 
computer is turned off. And “Reset” isn’t a dirty word 
anymore. Even during a blackout, the battery maintains data 


for 10 hours. . 


The Blue Flame II is available fully-populated, with 8 
megabytes, for $2095. 4 megabytes for $1195. 2 megabytes 
for $795. Battery Backup option costs $135. Call us for 
information on our SemiDisk products for S-100, and Epson 


QX-10/QX-16. 


If you want greater software speed, improved data security, 
increased hardware reliability, get a Flame. If you need the 
hottest disk performance possible, get a Flame. A Blue 


Flame || SemiDisk. 


SemiDisk Systems, Inc. 
P.O. Box GG 
Beaverton, OR 97075 
(503) 626-3104 





CIRCLE NO. 202 ON READER SERVICE CARD 


128 


easily. 

I’m not saying it’s perfect. In addi- 
tion to the bug I mentioned earlier, 
I found a truly ugly glitch while 
developing MathPlot. In the yc pro- 
cedure, I originally wrote INTEGER 
(vy * 100). This is a dumb mistake in 
that a type transfer (or cast in C 
parlance) isn’t a true function and 
thus doesn't resolve parametric ex- 
pressions. I just forgot, and I'm not 
ashamed; programmers make such 
mistakes all the time. But it gave the 
compiler a nervous breakdown, caus- 
ing it to generate a screenful of cryp- 
tic internal error messages. I spent 
half an hour commenting out pro- 
gram lines one by one before discov- 
ering the offender. And in fixing that 
problem, I found an error on page 
114 of the manual, which says that 
the entier function (REAL to INTE- 
GER) returns a REAL, which is 
clearly wrong. There are probably a 
few others of this sort that I haven't 
uncovered yet. 

But overall, Stony Brook Modula-2 
is good. It doesn’t have quite as 
many bells and whistles as its better- 
known competitor from Logitech, 
but the tools it provides are well 
rounded: 23 built-in modules, an edi- 
tor, a MAKE utility, and a symbolic 
debugger. It supports the usual ar- 
ray of memory models, has a satis- 
fying selection of compiler options, 
and uses the standard DOS linker. 
Above all, it’s fast. If you program in 
Modula-2, a viable and less intimi- 
dating alternative to C as a systems 
programming language, you'll like it. 
I sure do. 

Do you have a programming prob- 
lem you'd like to see addressed 
here? If so, drop me a line at DDJ 
(no calls, please!) or leave a message 
for KPORTER, Mountain View, CA, 
on MCI Mail. No promises, but all 
suggestions are welcome; dreaming 
up a subject for a monthly column 
is a fast track to burn-out. 
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(Listings begin on page 88.) 


Vote for your favorite feature/article. 
Circle Reader Service No. 5. 


Dr. Dobb’s Journal, April 1988 


The Advertiser Index 


ations pda Name Page # RS# Advertiser Name Page # RS# 
PISO, RN ee Lo ey SSS 119 191 Meta Ware | WACOrporated: a. /1s 0 oS ON ay ee ee 92 169 
Aesoft Pi spear g st * hp ene ao Ath rl Mien Ss 43 128 SO eG i esl ele ea Lae ata cee 127 201 
Pry PUG Fee na thas fae Gh ST Ie Qe 33 120 PRE SPU re Ps, RT ce dd eck, oe es ee aaah chee 126 199 
FCG eee NNR te Ped, oa Fo) picnic Pe ees TP 125 198 I oe. ge en mie h ee, “B Le panied OF oe "ba 137 208 
PAG Me Dik Ate ek Re eee Stee ge 147 216 Rr ts dn SEAT E Gare Aes Wa, ER ath sees 124 197 
American Cybernetics ......0...0.. 0.008: 135 207 Wicrieanr tes UP a Pa LR ee ae, 109 184 
Afar aaseeten ie. cs a A Th 140 210 RATT te Er oa Oe ne aN lh a 111 186 
Pit a eM Sct cde) ee ta asd semen: Dink Bs oo 112 Minera Group (The) ae Gk se i Res 48 135 
PMU ee alts aia de ce, fo Bot Rin oe Se ee 153 220 Fe CR PE Fete a i yl ee ae tg 97 176 
PEN SOOM MURS: su) te ee) OY ee ee 55 . Mortice Kern Systems, Inc... ........... 146 215 
Pron Code WOKS 3.62 Se. dg. Ae oly CS 95 175 Pion USCIS © 0) gales eae ¢ RAISES FRE, 96A . 
Eyal I ot RID oi Mas eee Rs os 10-11 107 Naridsort ASsOcimies «--:.3., busi ig ete Leys 74 155 
SPO LUMEEEREI he Se ha doe at Soa ate 2 102 Nu-Mega Technologies............... 67 149 
Pere NT EAMIINS e  e te 5 ae ed Se eed 99 177 NWP Intelligent Solutions, Inc... .......2.. 43 129 
area Teak nea es ia ee 1 101 Gaktsnn Aare, tic. CEURG). eo ae, eae 91 168 
Perey NACI Sg aoe is A eS AS 9 106 Ee occas oh a hie ian ee ey ge ee eek 52 137 
: Burtor Systeris Software... 6 as 94 . Panis. SOHWENO . =. Se SA es bee: © 60 144 
MOET hie tie et i ee ate ie 2 69 151 PRD Fai. i es oa eae ek 149 218 
Neer CAMRY 8 ok lag eae sry ie Sey ew Re 94 173 PUAGBEK.-SYSIOMIS! chee uel itiela brat ie 2 “we 34 121 

y Rae ry, VOLE Ss- Wee hae oe hk Se eB ad 63 146 Prat Lat Sofware). WG. at ek ea vs 45 131 

4 ete PWale oil ie a aS 44 130 PONTO GOMDORAION 3 6 ay DEL Se ies To 109 

r’ fmecmmece (The) . ysis Be ee ke 108 183 Progranfimtier’s “CONM@CHON oe ag nt es 150-151 219 
Sueemmnce ((he) 3° Ae insane. 3. 127 200 Programmers Pane? yo at eT eS aes 4 103 
\ RSS oo. > ag Pe Sot eer ed 39 126 Progranrimers: Pandise 60 Fa oO AS 5 104 

4 SE AIOW Se ce eae Bits 13 108 Programmer's Shop: (The) os coca, Seg 86 161 
la Courseware Applications, Inc............ 73 154 Prograniness: Stee Cie} kash yor ey bas 87 162 
? meme Programming aes se hey i ee ce 114 187 Re ce SUE eres ca IGE eh intel FURIE. on pera 90 166 
puerestalk Communications Spek ee ee 154 221 Quarterdeck Office Systems. ........... 30 115 

Er RII a Ao Dt eS a Pe oe 103 179 Quarterdeck Office Systems. ........... 116 

(| SMADSCIIDLIONS: oa eth ei ae eww eng! 112 r FHA LEROOUMINNTT oe ers are i ein ean ni 145 214 

MS ee AL. . . Ginteiteee iis she te lhe 134 223 Iai Cees (ha A See, Et Bd 56 . 

e | MEMNICS «ws gb Meee ee A ae 94 174 Raita: GOROIENON coho SP Sees eae 101 141 
19 Mem ow 5p SS ae as Beets ei oo ats 21 110 Parriisenciere es ir hee es BPS 89 165 
Beak Softwate 7S Sees tet a ey Seer 122 194 Roundhill Computer Systems LTD. ........ 110 185 
ReOSOlt,. 1G. eid ea eae ent Syn tense ees 77 158 Rte SEAN Seat en ee ie lb ee ee a Mas 46 132 
th EKD Compudetse kas 20S Sar Gee ne 32 119 SAS Fn oo ee lin ae oe en ea ee oy 123 196 
ie Elan. COPTHURE PRS 3 NP Ses ol 72 153 Sch@enBaeeneer AlDIS oa Sis ete ke ere 93 172 
7 Elan’ Compiter Greig ooo ita ee aes 90 167 Seientific Encemwors 5 Lea ree 93 171 

Entelekon Software Systems ............ 117 190 Secom Information Products Co........... 66 150 
Essential: Softwane:35..2 tin FE 121 193 Serni-Pisk Systeme: P50 asda eae a 128 202 
Essential: Soltware 2 a ce es ee edge 133 205 Sharpe Systems Corporation. .........-.. 134 203 
MRE SONTY 1. 6 21g oS Sit te eee oars. hes eens 54 139 Gott? AtwenCee Pe Sue tea ler Se Gok 89 164 
Pree IK be Se sp tetiera te: Ww bays, a= 23 111 Rest aitiaes sh rer dAn ees: Ah erga tes, ol 96 206 
Gimbpel, Software i eS hes. ee 148 * Soware onnectOns- WG. oso oe ots 83 159 
Godden Bow “Systemes. i ee 64 147 SNe Len, weet Sa a eee Lf 113 
Golder Sota oS oe a ee ce Sera 71 152 SonWale: SECUTIY WIG oe ho Ne tA ae 42 127 
Greenibal Sorte << si ase oe Oe 107 182 Soliton SuBIetie Tea ee a A eet 59 143 
Guidelines -Sollwate. fei ee 57 142 Soktiory Systems 0075 6 es aS see ee es Paes 143 213 
Harvard Sotiware: grctae ce. poe se OR 132 204 Sranctone ss i hg Pe ce te a el ori oh oa 122 
Hauppauge Computer Works. .......-.-. 37 124 Stony Brook Software, Inc... 2... ee es 75 156 
lET/Inference Engine Technologies. .......-. 115 188 Summit Information Systems, Inc.......... 65 148 
tee CME as ee i ee 120 192 Tee SON a a oe a 100 ’ 

SR MST Ear ee LS cee 8 A ae ake pee a ey 36 123 Wexas MSUUIEINS fi Ss eS eS OE 16-17 

Laboratory Microsystems, Inc...........-. 88 163 TOO! Welkers {1B} Sw Ba gee a a 105 180 
Eee Eee oA Cae Sa ae. Bie ete 139 209 Furbo tech. Repetto rn SI ee 64A - 

Lugaru Spitware: Lids be ee Wa 105 181 YW SECs, 2 Ae A eG 116 189 
M&T Catalog of Books & Software Tools. .... . 79-81 ' VeoaCon: Corporations * 5. dee nk) Ts 142 211 
Machine Independent Software Corp........ 142 212 Vermont Creative Software. .........-.-.. 38 125 

Wepre Cane SonWware’. 6 ih a oe 3 Pee 96 222 Waco Cia IBM PC) s 5. 2 a oe 29 114 

‘ Manx Software Systems... ..........-. 7 105 Whitewater Grows:-(e) ks ewe a ere: 49 136 

& : WAemcnnit Soo ae te eee ee aay tei ne geek ed 47 134 VATE Size Re ee ea ns 122 195 

Raia veers: 4.53 50s. ea 2 te te ake 53 138 Whyte: ‘Cor ptareiomiess os oo ik PF Sips a Aa 92 170 
Metagraphics Software Corporation ........ 76 157 Peer WE oat eet a re, i ea 61 * 


*The advertiser prefers to be contacted by phone; consult ad. 


_ Advertising Sales Offices 
Midwest Charles Shively (415) 366-3600 Southern California/AZ/NM/TX Michael Wiener (415) 366-3600 


- Northeast Cynthia Zuck (718) 499-9333 Telemarketing Rep./SE/SW USA Cheri Blum (714) 761 0294 
_ Martha Brandt (415) 366-3600 |. 
- Northern California/Northwest Lisa Boudreau (415) 366-3600 Director of Marketing and Advertising Ferris Ferdon (41 5) 366-3600 | 





a 


COLUMNS 


he Ninth Forth Modification 

Laboratory (FORML) Conference 
was well attended and well worth 
going to. It was held on a beautiful 
Thanksgiving weekend in Monterey, 
Calif., and you could watch the peli- 
cans migrating southward along the 
Pacific Coast and see swarms of Mon- 
arch butterflies hanging from the 
trees. 

As usual, there were two days of 
solidly packed presentations, with 
wine and cheese in the evenings. 
Stephen Sjolander presented a No- 
vix 4016 decompiler that would be 
of great value to anyone working 
with this chip. Bob La Quey pointed 
out that Forth would be an excellent 
language for implementing Hy- 
pertext. George Shaw presented the 


most complete and comprehensible | 


paper on QUANSs (multiple code field 
words) that I have ever seen. 
Stephen Pelc showed an implemen- 
tation of record and field defining 
words, and Dr. Ting shared a short 
recursive line-drawing algorithm. 
This year, Dr. Ting presented even 
more papers (four) than Wil Baden 
(three)! 

There were many other high-qual- 
ity papers that you will be able to 
read in the 1987 FORML Conference 
Proceedings, available from the Forth 
Interest Group ([408] 277-0668) later 
this year. Speaking of that, the Pro- 
ceedings of the 1987 Rochester Forth 
Conference is now available as The 
Journal of Forth Application and Re- 
search (JFAR), vol. 5, no. 1, 1987, 
from the Institute of Applied Forth 


by Martin Tracy 





Research, 70 Elmwood Ave., Roches- 
ter, NY 14611. Or you can order it 
indirectly from FIG. 

The informal theme of FORML 
this year seemed to be BLOCKs vs. 
text files. Each attendee received a 
copy of Tom Zimmer's PF Forth (for- 
merly ZF Forth and soon to be FF 
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Forth). Tom's IBM PC public-domain 
dialect is the joint effort of Zimmer, 
Smith, Curley, and Modrow. It is 
enormous by Forth standards, occu- 
pying 1 Mbyte of disk space. It in- 
cludes source files for dozens of 


_ utilities. You can get an ARCed copy 
| from the GENie Forth bulletin board 


(see DDJ, December 1987). Expect to 
spend a lot of weekends learning it. 

PF Forth keeps all its source in 
text files and includes a sophisti- 
cated file editor. The program image 
is in a .EXE file, and headers are 
kept in a separate segment. It is 
Closely related to Mike Perry's un- 
published F83Y. Mike is the Perry 
behind the Laxen/Perry F83 dialect. 


(Henry Laxen has, for the moment, | 


died and gone to C.) 

In Mike's own words: “In an addi- 
tional attempt to merge with the 
environment, explore the trade-offs, 
and generally ingratiate myself with 
certain fanatic elements, I discarded 
BLOCK. Don't worry, it’s still avail- 
able as a loadable option. When a 
file is loaded, it is read into the 
current file segment with a single 
call to DOS, then interpreted. Note 
the 64K limit. All control characters 
and blanks are treated as_ white- 
space. This allows a single compare 
to be used. Compilation is quite fast 
compared to whatever I used to 
use.” 

The first ever Australian Forth Sym- 
posium will be held May 19-20, 1988, 
at the NSW Institute of Technology. 
The focus is on productivity, and 
there will be papers, demonstra- 
tions, and hands-on instruction. 
Chuck Moore will be there. If you 
want to go, ring Jose Alfonso or Dr. 
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Walker on (02)20930 or Roy Hill on 
(02)217-3828. 

The next ANSI X3J14 Forth stan- 
dards meeting is also in May, some- 
where in the Northeastern United 
States. Contact me for details if you 


| would like to attend. You can reach 


me at Forth Inc., 111 N. Sepulveda 
Blvd., Manhattan Beach, CA 90066. 

At the second ANSI Forth meeting 
(November 1987), preparations were 
made for accepting technical pro- 
posals. A copy of the approved pro- 
posal form is on page 132. About 
two dozen proposals have been re- 
ceived and many more are sure to 
follow. There seem to be roughly a 
dozen technical issues: vocabular- 
ies, Mass storage, flow of control, 
arithmetic, documentation require- 
ments, testing, assemblers, con- 
trolled reference word set, ROMabil- 
ity, host and file structure, the 
interpreter, Tick >BODY and address- 
ability, numeric output, and excep- 
tion handling. 

Each member of the ANSI Forth 


_committee will prepare a position 


paragraph on each issue. One mem- 
ber, the “magnet,” will collect all the 
paragraphs and synthesize them 
into one paper describing the differ- 
ent sides of the issue. You can fol- 
low or participate in the discussion 
on any issue by signing onto the 
GENie Forth bulletin board, Cate- 
gory 10, Forth Standards. I'm told 
that several hundred people have 
already perused this category. 


Two New Books on Forth 

You will find the new Dr. Dobb's 
Toolbook of Forth, Volume II, to be 
an excellent anthology of papers on 
Forth programming techniques. In- 
side, you can find Bresenham’s algo- 
rithm, FFTs, spreadsheets, and Logo, 
all implemented in Forth. Some pa- 
pers are taken from FORML and 
Rochester proceedings, and others 
first appeared here in DDJ. Unfortu- 
nately, credit is not given to the 
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turn this 
into this! 


MASTER*«KEY 
No Other Product Comes Close! 


An EXPERT may not know the solution, but always 
knows where to find it. 


MASTER+KEY HELPS ANYONE solve those 
confusing and frustrating software puzzles more 
rapidly and easily than any other software available, 
at any cost! It gives you know-how within hours that 
may otherwise take years of experience. Create a 
new program from an old one. DON’T REINVENT 
THE WHEEL! 


MASTER*KEY - Smart! 

MASTER<+KEY is an intelligent self-documenting 
MS-DOS reverse assembler. Its sophisticated 
procedures swiftly race through massive and baffling 
object code files to effortlessly discover potential 
trouble spots. 


MASTER*KEY - Educational! 

YOU DON'T NEED TO KNOW ASSEMBLY 
LANGUAGE! MASTER-KEY will take any program 
from your |BM-compatible computer and return fully- 
documented, easily- understood assembly language 
source code (Microsoft MASM 5.0 compatible). 


MASTER*KEY - Easy To Use! 

MASTERs« KEY works both automatically from the 
DOS command line or interactively from menus 
similar to Lotus Corporation’s 1-2-3 or Symphony. 
No need to remember any new commands or con- 
tinually refer to a manual. Use it immediately! 


Minimum System Requirements: 
256K + 8088/8086/80186/80286/80386 PC 
MS-DOS or PC-DOS 2.0 + 
One 360K DSDD Floppy Drive (IBM PC Format) 


MS-DOS is a trademark of Microsoft. 
PC-DOS is a trademark of IBM. 


MASTER*KEY will guide you 
t 


Help you learn assembly language, if you desire. 
2. Discover how any program runs or why 
it doesn’t. 
3. Alter or remove unwanted object code from 
any program. 
4. Incorporate routines from compiled programs 
into other assembly language, Basic, C, or 
Pascal programs. 


Dealer/Distributor Inquiries Welcome 


Sharpe Systems Corporation 
2320 E Street, Dept. 44, La Verne, CA 91750 714-596-0070 
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C:>DEBUG PROGRAM.COM 

-D100 136 

8848:0100 

8848:0110 

8848 :0120 
O. 8848:0130 
Q 








EB 18 49 GE 63 6F 72 


CD 21 CD 20 58 EB 2F 





HOO100: JMP 


Short HOO11A 











72-65 63 74 20 44 4F 53 20 k.Incorrect DOS 


76 65 72 73 69 GF GE OD-OA 24 SO B4 30 CD 21 86 
EO 3D 36 01 72 OS 3D OA-O02 76 O09 BA O02 O01 B4 O9 


version..@P40N!. 
*“w6.5.8..V.i2. 04. 
MiM Xk/ 


300100 EB18 


Je Pan HRS SLE O LE Sede tee aa de wee sa eeaeenstine cates ald 
o DB “Incorrect DOS version" 300102 496E636F727265 
DB ODh 300117 
DB OAh 300118 
O DB ‘s” 300119 24 
fb SSS aa she eh eg ae aie a Bi es Saas tes ent Bs, Oe eae ae 
HOO11A: PUSH AX 3;0011A SO P 
O MOV AH, 30h 3;0011B B430 =O 
INT 2ih 3i1-DOS_Ver_Nuamber ;0011D CD21 £3 
XCHG AH, AL 3;0011F 86E0 ois 
CMP AX,0136h 300121 3D3601 =6_ 
O JB Es ol es nb how ey er ee 300124 7205 er 
CNP AX,O20Ah 300126 3DOA02 wi % 
JBE BU REE a gy ost as eke. eS aioe 300123 7609 v_ 
O HOO12B: MOV DX ,0102h 30012B BAO201 tle 
MOV AH,O9h 3;0012E B409 ak 
INT 2ih 31-Display_String 300130 CD21 a8 
INT 20h ;TERM_normelly:20h ;00132 CD20 iH 
O  biacaer pips rate is daca Waka ciara bate iat cit on i oie aa ant dee ion each ge bo , 
HOO134: POP AX 300134 58 x 
JMP Short HOO166 300135 EB2F ae 
O , 
MASTER*KEY XREF - PROGRAN.XRF Page i 
O 
0102h : 121 2F5 301 320 
O20Ah 3 126 
O3SCBh : i2B 
O i-Display_String $ 130 S91 610 
1-DOS_Ver_Nuaber : 11D 
HOO100 : 100 
O HOO11A : 100 11A 
HOO12B : 124 12B 
HOO01i34 $ 129 134 
HOO166 : i35 
O TERM_normelly:20h : 132 
O 


step by step to: 


5. Make software more compatible with your 
computer. Be certain a questionable program 
won’t damage your system BEFORE you runit. 

6. Modify software to operate with other 
versions of DOS. 


7. Customize your COMMAND.COM or other 


executable program directly or by reassem- 
bling your altered MASTER*KEY source code. 


MASTER * KEY should not be confused with any public 
domain or share ware software that may have a 
similar name or be a similar product. 


Order Now! 
Just $79° 





(not copy protected) 


Phone orders accepted on MC or VISA 


$82.45 (includes $2.50 shipping) 
shipping) C€.0.D. orders add $2.00 


(714) 596-0070 


Please send MASTER*« KEY! 


Send checks to: 


Sharpe Systems Corporation 
2320 E Street, Dept. 44, La Verne, CA 91750 


Name 
Address 
City State Zip 


$87.65 in California (includes tax & 
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Filling o 

Page: Please number each page of your proprosal. 

Title: A short phrase that characterizes your proposal. Example: 
String extensions. 

Related Proposals: If you have submitted other proposals on this subject, please 
list their titles and dates. 


Proposal ) Are you proposing a specific change? Then check the Pro- 
_ output through DOS, BIOS, or direct to ) vide posal box. 
memory Windows organize both text ar Comment( ) Otherwise, check the comment box. 

Keyword(s): Pick a keyword that helps others understand what area of 


Forth your proposal addresses. For example: Kernal, double 
integers, system word set. . . 

Forth word(s): List all affected Forth words, including ones added or deleted 
by your proposal or discussed in your comments. 





Abstract: Briefly convey the nature of your proposal (or comment). 
Proposal: State your proposal in specific terms. When proposing a new 
word, or changes to an existing word, simply state the new 
ice, with no definition. Include a stack picture if appropriate. 
ompiles 79 & — Discussion: _ If you are making a comment, put it here. If you are submitting 


a proposal, provide compelling arguments in favor of your 
proposal. Be concise. If you are aware of arguments against 
your proposal, state them and rebut them. Is your proposal 
consistent with current Forth conventions? Does the proposal 
involve hardware or other system dependancies? Does if 
affect application portability? Does it have implications for 
multi-user environments? Should the proposed change by 
mandatory? Does it affect ROMability? Is it general purpose? 
How does it affect execution speed? How does it affect 
compilation speed? What are its memory requirements? 
Submitted by: Provide your name, address, and daytime phone number. 





_ HARVARD> 
-SOFTWORKS 


PO BOX 69 


SPRINGBORO, OH ee 
(513) 748-0390 


Use the “ANSI ASC X3/X3J14 Technical Proposal Form, cont'd” form if additional 


pages are needed. Remember to put page numbers and repeat the “Submitted by” 
and “Date” fields on each page. 






i | _ Figure 1: Approved ANSI Forth proposal form 
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(continued from page 130) 


original publication. There are 32 
quality papers in all, many of them 
with source code. The Toolbook 
sells for $29.95 and is available from 
DDJ ((800) 533-4372 or [800] 356-2002 
in California). If you don't want to 
type in the programs, you can get 
them on a disk for an additional $25. 

Dick Pountain’s Object-Oriented 
Forth (Academic Press, 1987; $19.95) 
begins: ‘Forth is, regrettably, one of 
the best kept secrets in the comput- 
ing world.” In this book, Dick ex- 
tends Forth to include named ob- 
jects, which increases its readability 
and reusability. In essence, an ob- 
ject is a defining word used to cre- 
ate defined words called instances. 
An instance has its own hidden data 
structure, made of instance vari- 
ables, and a set of permitted opera- 
tions, called methods. Instance vari- 
ables are to instances as user vari- 
ables are to tasks. 

When an object is defined, all in- 
stance variable and method names 
are removed from the Forth diction- 
ary by relinking the headers. Only 
the object itself can find them be- 
cause it has the initial link, or “key,” 
to the hidden vocabulary. All in- 
stances of this object are state smart 
and know the key. During compila- 
tion an instance looks the following 
method up in its private dictionary 
and compiles a reference to it. 

As an example, consider complex 
numbers as objects. They might 
have instance variables for the real 
and imaginary parts and methods 
for addition, multiplication, and so 
on. Pountain limits his methods to 
@ and !, however, so that complex 
results are left where they belong, 
on the stack: 


TYPE> COMPLEX 
2 VAR REAL 
2 VAR IMAG 
OPs> 
: COM! IMAG ! REAL! ; 
: COM@ REAL @ IMAG @ ; 
ENDTYPE> COMPLEX 


COMPLEX X 2 3 X COM! 
Object-Oriented Forth (OOF?) 


takes you through this and other 
abstract data types, including lists 
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Secrets 
Revealed 


What They Don't Teach You 
About TSR's And ISR's At MIT 


When our customers started asking for a 
resident communications program I thought 
it would be a piece of cake. I was surprised 
by how little I really knew about interrupt 
calls to DOS and their attendant dangers. 


Catch-22 


The real Catch-22 is that TSR’s are multi- 
programming in a very real sense, and MS- 
DOS was never presented to the public as 
multi-anything. 


All things considered, they would still be 
elementary if all you had to do was issue 


system bios calls, such as interrupts 10h, 14h, 


17h, 16h, etc. But, I’m getting ahead of 
myself. 


The secrets of TSR’s and interrupts are 
closely guarded by the companies that 
develop them. So coming up with any solid 
information can be frustrating. 


Fear Of Terminating 


After spending many sleepless nights in 
front of a CRT using all the tricks of the 
trade, including help from the Periscope III 
Debugger, the project was completed. I had 
lost my fear of terminating and staying 
resident. 


In the process I became familiar with a 
couple of powerful, undocumented DOS 
interrupts that Microsoft had tucked away 
for their own use. 


In addition, there were some gross misun- 
derstandings about other functions listed on 
the better BBS’s. Even some of our own 
functions from Essential Communications 
had to be wired together in new ways. 


So Close I Could Taste It 


When I was finally done, I recognized that 
we were only a short distance away from 
devising a method for making any C 
program memory-resident and well-behaved. 


Being a red-blooded American Entrepre- 
neur, I was eager to market the fruits of our 
labor. In fact, by the time we put the final 
touches on the /*resident_C*/ library, we felt 
that maybe we should guard the secrets just 
as closely as everyone else. 


Programming 


Create TSR's 





The Good Guys Wear White Hats 


After heated debate, we decided that 
publishing a library of interrupts without 
explaining how and what we did would not 
be fair to our public. So not only do we 
supply you with the proper functions, but we 
go into detail as to the do’s and don’ts of 
memory-resident programming. 


/*resident_C*/ will allow you to make any 
C program a TSR without knowing any of the 
secret society handshakes (pun intended). 
However, if you do want to join the club, we 
provide all the knowledge you'll need. 


Make Any C Program Memory 
Resident 


Regardless of what your program does: 
communications, disk writes and reads, DOS 
calls, or graphics, you can make it a safe, 
well-behaved TSR. 


/*resident_C*/ will also allow you to create 
things like memory-resident libraries to be 
shared by a number of different programs. 


/*resident_C*/ can also be ordered with 
source code for the really adventurous. 


As with any Essential product 
/*resident_C*/ comes with a 30 day money- 
back guarantee. Available for Microsoft, 
Lattice and Turbo C. So call today and 
establish residency with /*resident_C*/ 


Price $99 - Source $99 


Other Essential Products Include 


ScreenStar - Essential Communications, 
Graphics and Utilities - Please call for 
further information 201-762-6965 








= To Order Call 
Oo raer alls 
Me 301-762-6965 





Essential Software, Inc. 


South Orange Plaza 
76 S. Orange Ave., Suite 3 
South Orange, N.J., 07079 


/*resident_C*/ is a trademark of Essential Software 


CIRCLE NO. 205 ON READER SERVICE CARD 


133 


THE FORTH COLUMN 
(continued from page 133) 





and heaps. This book is not for be- 
ginners, and I highly recommend it. 


Dead Duck’s Hard Beak 
Starting in the October 26, 1987, is- 
sue of InfoWorld, Steve Gibson ran 
three articles in his Tech Talk col- 
umn describing the implementation 
of Microsoft’s QuickBASIC 4.0. Ac- 
cording to Mr. Gibson, “The tech- 
nology is known as ‘Threaded Pseu- 
doCode’ ... and was first seen in 
the strange powerful language 
Forth.” He continues, “Forth is the 
language you want to pretend 
doesn't exist because it’s horrible to 
write with but hauntingly powerful.” 
Needless to say, these comments 
drew immediate rebuttal from the 
Forth community. Here is a sample, 
translated from Timothy Huang’s Chi- 
nese Forth column: “... the term 
Threaded PseudoCode was used re- 
peatedly with such an envious atti- 
tude, like a human being who just 
discovered the warmth of the sun. 
In fact, we have been using this 


Break 
| The dBase 
Barrier 


dBase to C conversion 
is now a reality 


Sooner or later you’re going to run into the dBase wall. It may 
come up unexpectedly. Maybe you know it’s there. But at 
some point you are going to need faster run-time, real 
portability, stronger code refinement, and source code security. 


Using dBx to translate your dBase code to C is the perfect way 
to break the dBase barrier. C is portable, fast, and flexible. C 
programmers appreciate our commented, clean K&R code. If 
you are new to C, dBx is a great way to get up to speed. Why 
not call us today and discuss your individual situation. 


Bx - ~ Zhe dase to C Translator - ts B 


PELE 


(203) 255-3400 


TELEX + 6502972226MCI 


A Desktop Ai 


303 Linwood Ave. 
Fairfield, Ct., 06430 
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technique for more than ten years. 
So why doesn't Mr. Gibson and Mi- 
crosoft, as well as the whole com- 
puter industry, come straight out 
and recognize FORTH, and quit be- 
having like a dead duck with a very 
tough beak?” 


Text from BLOCKs 

In my last column, February 1988, I 
presented command for reading and 
writing data and text files from 
BLOCKs. Some of the source screens 
needed fixing, and you will find cor- 
rected versions in this month's List- 
ing One, page 94. 

The new GETTEXT includes the 
flow-of-control construct BEGIN... 
WHILE. ..WHILE. . REPEAT. This con- 
struct occurs naturally in both string 
and file applications: 


BEGIN ( Are there more characters?) 
WHILE ( Is this one that you want?) 
WHILE ( Go ahead and use it.) 
REPEAT 


Note that this is a proper structure, 
delimited by BEGIN at one end and 
REPEAT at the other. 














To order, or for more information, call 1-800-874-8501 
6915 SW MACADAM, SUITE 200, PORTLAND, OR 97219 


OREGON G SOFTWARE 


Professional Products 


In most Forths, the stack is used 
at compile time to hold fix-up ad- 
dresses until they can be resolved. 
In some dialects, such = as 
polyFORTH and ZEN, only these ad- 
dresses are on the stack. Further- 
more, WHILE swaps addresses to 
keep the BEGIN address on top. BE- 
GIN. . .WHILE.. .WHILE. . REPEAT 
can be implemented simply by add- 
ing THEN to resolve the second 
WHILE, as in BEGIN... WHILE... 
WHILE. . REPEAT THEN. 

Other Forths, especially those de- 
scending from FIG Forth, keep extra 
flags on the stack for ‘compiler secu- 
rity.’ If BEGIN...WHILE. ..WHILE 

. REPEAT does not work for your 
Forth, you can change it to the less 
elegant construct: 


BEGIN ( Any more characters?) 

DUP IF DROP ( Want this one?) 
THEN 

WHILE ( Eureka! Use it.) 

REPEAT 


DDI 
(Listing begins on page 94.) 


Vote for your favorite feature/article. 
Circle Reader Service No. 8. 


FULL COMPILER -— not a preprocessor 


= Complete software-development system 

® Selectable AT&T C++, ANSI C, K&R C 

m™ Based on proven Oregon Software technology 
™ Generates extremely fast, compact code 

= Comprehensive error checking 

m™ Backed by responsive support engineers 

= Strongly typed language 


DATA ABSTRACTION FACILITY (classes) 


= Operator overloading 
m Information hiding/sharing 
= Constructors/destructors 


| want top performance 
at an affordable price 


or Software Development 
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Quit Wasting Time! 


As a programmer, most of your time is spent writing and de- 
bugging source code, and documenting your work. A powerful, 
easy-to-use programmable text editor could be saving you 
HOURS of unnecessary effort. 


Only MUITI-EDIT has all these time-saving features: 


Fully automatic Windowing and Virtual Memory. 
Edit multiple files regardless of physical memory size. 
Easy cut-and-paste between files. 

View different parts of the same file. 


Powerful, EASY-TO-READ high-level macro language. 
Standard language syntax. 
Full access to ALL Editor functions. 
Automate repetitive tasks. 
Easy, automatic recording of keystrokes. 





Complete DOS Shell. 


Language-specific macros for ALL major languages. Scrollable directory listing. 
Smart indenting, Copy, Delete and Load multiple files with one command. 
Smart brace/parenthesis/block checking. Background file printing, 


Template editing. 
Supports C, Pascal, BASIC and Assembler. Regular expression search and translate. 


Terrific word-processing features for all your Condensed Mode display, for easy viewing of your 


: program structure. 
ee needs. Pop-up FULL-FUNCTION Programmer's Calculator and 
ntelligent word-wrap. ASCII chart. 
Automatic pagination. 
Full me formatting with justification, bold type, and MOST IMPORTANT, 
ag Ee a cco the BEST user-interface on the market! 
+ Extensive context-sensitive help. 
aon ‘setroagiaa eae eines: ¢ Choice of full menu system or logical function key layout. 
Built-in MAKE capabilities. . Function keys are always labeled on screen (no guessing 
Run compiled program without leaving editor. required!). ; 
Automatically allocates all available memory to compiler * Excellent online, interactive tutorial. 
or program. « Keyboard may be easily reconfigured and re-labeled. 


Users of Wordstar and Turbo Pascal’s Editor could be programming in a fraction of the time with these features. 
NO EDITOR ON THE MARKET TODAY HAS ALL THESE FEATURES, OR OFFERS YOU THIS MUCH POWER 


AT A REASONABLE PRICE, EXCEPT 
COMPLETE 
U ti = it Or Get our FULLY FUNCTIONAL DEMO 
mB caer for only $10! 









VERSION 2.0 





Requires IBM/PC/XT/AT/PS2 or full compatible, 256K RAM, PC/MS-DOS 


| ' 
2.0 or later-Multi-Edit and American Cybernetics are trademarks of American Get our FULLY FUNCTIONAL DEMO Copy for only $10! 









Cybernetics. BRIEF is a trademark of Underware, Inc. Norton Editor is a To Order, Call 24 hours a day: American Cybernetics 
trademark of Peter Norton Computing, Inc. Vedit is a registered trademark of 1-800-221-9280 Ext. 951 138 Madrid Plaza 
CompuView Products Inc. Copyright 1987 by American Cybernetics. in Arizona: 1-602-890-1166 Mesa, AZ 85201 


Credit Card and COD orders accepted 
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REVIEWS 


EXAMINING ROOM 


Turbo Professional 4.0 





Product: 

Turbo Professional 4.0 
Target: 

PC or PS/2 and compatibles 
Requires: 


DOS 2.0 or later; Turbo Pascal 4.0 or later; hard disk recommended 


Pricing: 
$99 
Vendor: 


Turbo Power Software, 3109 Scotts Valley Dr., Ste. 122 


Scotts Valley, CA 95066; (408) 438-8608 





f you want to protect your reputa- 

tion as a guru, don't let anybody 
know you use the Turbo Profes- 
sional 4.0 library. The guys down at 
Turbo Power Software have made 
the hard stuff so easy that it’s bound 
to reduce your fellow programmers’ 
awe of your coding prowess. 

Imagine! You can create a pop-up 
window with a one-liner, and with 
other one-liners you can rearrange 
a stack of windows to bring the 
selected one to the top, make any of 
them go away, and write to the ac- 
tive window. Or you can similarly 
manipulate EMS and_ pull-down 
menus, insert chained interrupt han- 
dlers, and manage TSBs. 

All kidding aside, Turbo Profes- 
sional 4.0 is a superbly crafted tool- 
box for serious programmers using 
Turbo Pascal 4.0. Consisting of some 
300 functions and _ procedures 
spread across 25 Pascal units, it truly 
does render the difficult accessible. 
Some of these routines address de- 
fects in Turbo Pascal 4.0—lack of a 
BCD type, for example—while oth- 
ers simplify the dirty work of ad- 
vanced applications development. 
My particular favorite, the unit on 
TSR management, removes the mys- 
teries and perils from this most frus- 
trating kind of program. There are 


Ron Copeland, associate editor, is 
the coordinator for this review sec- 
tion. He welcomes your feedback on 
products worth reviewing. 
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even functions for changing the hot 
key on the fly and disabling a TSR. 
The manual has six lucid pages of 
discussion that make TSRs make 
sense. The 426-page manual does a 
workmanlike job of explaining how 
all these abstractions of complexity 
fit together and operate, and what 
the parameters mean. 

There isn't room here to cover all 
the goodies in this package, so I'll 
list the major categories and discuss 
a few particulars. These are the 
groupings of routines: 

@Screen: Virtual screens, popups, 
pulldowns, input editing 

® Strings: Manipulations, formatting, 
long ASCIIZ, DOS command line 
parser | 
@ Low-level: Sugar-coated DOS and 
ROM BIOS calls 

® Interrupts and TSRs: ISR and TSR 
management, 8087 TSR support, criti- 
cal error handler 

® Sorting: In-memory non-recursive 
quicksort of up to 64K elements 

® Memory: EMS and extended mem- 
ory management 

® Macros: Keyboard macros and an 
editor 

@ Large arrays: In RAM, EMS, and 
virtual memory 

® BCD: 18-digit precision for arith- 
metic and transcendentals 

@ Other: Runtime error recovery, in- 
line macros 

Additionally, the package includes 
about a dozen demo programs that 
really are useful, such as a program- 





mer's calculator (a TSR written with 
the library), time management/bill- 
ing utilities, and a GREP-like text 
finder. 

Turbo Professional comes on 
three diskettes, only one of which 
(the TPU disk) you need to copy to 
your Turbo Pascal 4.0 directory in 
order to use the software. The other 
two disks contain the demo pro- 
grams and archived source code for 
the entire library, along with an un- 
archiving utility. 

You harness the horsepower of 
this programming engine with the 
USES statement. All the units have 
the name pattern TP*.TPU, which 
makes them easy to identify. There 
are some unit dependencies, and 
several depend on Pascal’s DOS unit 
as well. Appendix A in the manual 
lists them. As an example, to do 
virtual screens, the directive is 


USES DOS, TPCRT, TPScreen; 


The syntax of some of the calls is 
a little awkward, but that doesn’t 
diminish their power. For example, 
to initialize and work with a pop-up 
window, the call is 


IF NOT MakeWindow (win1,...) 
THEN 

{Error occurred} 
ELSE 


{Do window stuff} 


(MakeWindow is a function taking 
12 arguments.) If MakeWindow is 
successful, you can pop it up with 


BoolResult := 
(win); 


SetTopWindow 


where BoolResult becomes TRUE if 
the operation works. Getting rid of 
the most recently popped window 
is a different matter: 


winPtr := EraseTopWindow; 
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Ifyou ever| 
wanted to. 
take acrack 


language, the time 


You probably already simple steps, you can be 
know that assembly calling Macro Assembler 
language subroutines subroutines from pro- 
are the smartest way to grams written in your 
get the fastest programs. favorite language. 

But if the complexities Now that you’re writ- 
of working in assembler ing the fastest programs, 
made you think twice, Microsoft is giving you 


here’s some good news. 
We've made Microsoft® 
Macro Assembler Version 
0.0 a lot easier to use. 
We eased the learning 
process by giving you the best 
support around. We com- 
pletely revised our docu- 
mentation. The new Mixed 


the fastest way to de- 
bug them. For the first 
time, we ve added our 
CodeView® debugger 
to Macro Assembler. 
With source code 
and comments on your 
screen, Microsoft Code- 
View makes debugging pro- 


Language Programming srams containing assembly 
Guide gives you step by step language subroutines a snap. 
instructions for lmking your And you'll be glad to know that you 
assembly code with Microsoft don’t sacrifice any speed for all the ease of use. 
QuickBASIC, C, FORTRAN, We took the fastest Macro Assembler on 
Pascal and other languages. And the market and made it even faster. 


you get a comprehensive refer- So what are you waiting for? Get your 
ence manual with listings of the hands on Microsoft Macro Assembler and 
instruction set and examples of each instruc- see what it’s like to break your personal 
tion. We didn’t stop there, though. You also speed limit. 


get an on-disk collection of templates . / 
and examples. Microesott 
: For more information or for th f est 
_ We've also dramatically simplified the Micro tes cal B00) 208 2100 fs Waste Sine nd 
high-level language interface. In just a few Alaska, (206) 882-8088. In Canada, call (416) 673-7638. 


Microsoft, the Microsoft logo and CodeView are registered trademarks of Microsoft Corporation. 
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which returns a pointer to the win- 
dow erased. The extensive use of 
such value-returning functions 
rather than more intuitive proce- 
dures gives the library a C-like feel. 

The BCD module brings 18-digit 
precision to Pascal. This is much 
better than the 11-maybe precision 
of the REAL type and not subject to 
roundoff errors or the unexpected 
appearance of E notation. BCD is 
usually associated with business pro- 
gramming, but Turbo Professional 
makes it viable for scientific applica- 
tions as well by including trig and 
exponential functions. 

Inclusion of the source code with 
Turbo Professional is a nice touch. 
If you think certain routines ought 
to work differently, you can change 
them. Some are written in Pascal, 
but most are in assembler, so you'll 
need MASM or something like it if 
you plan to do much rewriting. Of 
course you can also add functional- 
ity to suit. 

I have only one complaint about 
Turbo Professional. I never did fig- 
ure out how to work the Menu 
Maker utility, and the documenta- 
tion didn't help. That problem aside, 
for serious developers who work in 
Turbo Pascal 4.0, Turbo Professional 
is an outstanding productivity aid 
that will pay for itself many times 
over. 

by Kent Porter 


Brief 


Product: 

Brief, Version 2.01 

Target: 

PC or PS/2 and compatibles 
Requires: 

DOS 2.0 or later; 192K minimum 
Pricing: 

$195 

Vendor: 

Solution Systems 

541 Main St., Ste. 410 

South Weymouth, MA 02190 
(617) 337-6963 








ne might fairly describe Solu- 
tion Systems’ Brief as the quint- 
essential programmer's editor. Un- 
fortunately, that doesn't tell you 
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much. So maybe I'd better tell you 
why I think it’s so terrific. 

To begin with, it’s chock full of 
the features that programmers rou- 
tinely require. And in the event that 
you find it wanting in a specific 
function or feature, Brief has its own 
C-like language for writing macros 
or otherwise tailoring it to your re- 
quirements. 

Although Brief isn’t copy pro- 
tected, it’s necessary to run an in- 
stallation program to configure it. 
There are scads of options: colors, 
cursor shapes, tab settings, 25— ver- 
sus 43— versus 50-line mode, backup 
files, and what not. This process 
uncovers some intriguing features. 
For example, you can set up Brief to 
save your work automatically every 
SO many seconds or minutes, thus 
minimizing the impact of a power 
failure. For another, you can estab- 
lish different parameters for each 
language you use. 

Brief does all the usual editing 
things: line insert/delete, search and 
replace, block move/copy, etc. Most 
editing commands are accom- 
plished by ALT-key sequences. 

Brief gives you plenty of room to 
work in; maximum size of a text 
buffer is 32 Mbyte (DOS limit), with 
the maximum number of buffers lim- 
ited only by available RAM. Macro 
size is also plentiful with a 32K limit 
and the maximum number of mac- 
ros limited by available RAM. 

A particularly nice feature is the 
Undo command, ALT-U. Since Brief 
maintains an internal change stack, 
by default, this stack keeps track of 
the most recent 30 changes. And if 
you wish, you can increase it as 
high as 300. So, if you find that some 
program modification is headed 
down the primrose path, just start 
hitting ALT-U to back out the 
changes you’ve made. Brief “un- 
does” them in LIFO order. 

The real stuff of Brief is its multi- 
file and windowing capabilities. The 
program comes up in full-screen 
edit mode, where one file owns the 
entire screen. You can load any num- 
ber of files and move among them 
either in carousel fashion or via di- 
rect jumps using ALT commands, 
with each in full-screen mode. Alter- 





natively, you can split the screen 
into resizable tiled windows and put 
a different file in each one, or differ- 
ent parts of the same file in two or 
more windows. If several windows 
contain the same source code, a 
change in one immediately appears 
in all. 

The import of this is that if two 
modules are related, you can look 
at both on the same screen, jump- 
ing between to reconcile their differ- 
ences. Or, in a single program, you 
can display a structure definition in 
one window while you write its in- 
itialization code in another, which 
displays a different part of the file. 
In a complex application, this fea- 
ture alone can save an astronomical 
amount of time simply by eliminat- 
ing the need to save and load files, 
scroll around, and print listings that 
will immediately become out of 
date. 

Also, Brief's cut-and-paste and 
copy operations span multiple buff- 
ers using a clipboard concept. This’ 
lets you take a function out of 
PROG1 and insert it into PROG2 with 
half a dozen keystrokes. 

On the negative side, moving 
among windows is awkward. You 
press the F1 key, then a cursor ar- 
row indicating which direction you 
want to go. You have to repeat this 
in every window you pass through 
between origin and destination. It 
would have been better if they'd 
numbered the windows so you 
could do F1-window number. 

Brief lets you set up and select 
language-specific environments. For 
example, indentation conventions 
are different for Assembler than for 
block-structured languages such as 
Pascal, C, and Modula-2, as is case 
sensitivity (Pascal and Assembler 
aren't, C and Modula are). The de- 
fault filename extensions also differ. 
The setup program builds parame- 
ter sets for each language. In it you 
can also specify the compiler com- 
mand line, enabling you to invoke 
the compiler from within Brief. This 
effects a Turbo/Quick-style “environ- 
ment,’ although of course there isn't 
the same degree of interaction be- 
tween editor and compiler that 
characterize true integrated environ- 
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Now the Lattice C Compiler takes you where it’s 
never gone before. With Version 3.3, it works on 
two operating systems: MS-DOS and OS/2! 


You may now use Version 3.3 on an MS-DOS 
system to create programs that run under OS/2 
protected mode. Or vice versa. A simple “switch” 
has been put into the compiler to let you gener- 
ate code for either system or both. 


New improved standards... 


Version 3.3 is fully compliant with the latest ANSI 
C standards. It also has improved embedded 
system support, enhancements to the standard 
libraries and a host of other compiler advances 
too numerous to compile. 


At a new improved price and value! 


The suggested retail for Lattice C Version 3.3 is 
only $450. And 3.3 also includes “family” ver- 
sions of the Lattice Screen Editor (LSE) and the 
Lattice C-SPRITE™ symbolic debugger, compati- 
ble with both MS-DOS and OS/2 systems, at 

no charge. 


C for yourself why Lattice is the professional 
programmer's choice for serious MS-DOS and 
OS/2 programming. 





aS 
ese 
<a Lattice, Incorporated 
2500 S. Highland Avenue 
Lombard, IL 60148 


“— 


e 
/ attice Phone: 800/533-3577 
In Illinois: 312/916-1600 


Subsidiary of SAS Institute Inc. 


Lattice is a registered trademark of Lattice, Incorporated. MS-DOS isa registered trademark of Microsoft Corp. OS/2 is a registered trademark of International Business Machines Corp. 
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Developing an application used to be easy — all you 
had to do was program it. But today, with countless lan- 
guages, compilers, libraries, databases, editors, debuggers, 
and other tools, it is choosing the right development soft- 
ware that creates the real problem. 

Now The Andsor Collection introduces a unique solu- 
tion: a collection of sophisticated development tools, which 
you can use on their own, or together with your old ones. 

The Andsor Collection is, of course, the superb 
application development system that programmers, VARs, 
and other developers have been using for over two years. 
And starting with Version 2.2, The Andsor Collection has 
acquired a new dimension: now you can access all its func- 
tions from within another program! 

Think of it as a comprehensive, universal, language 
independent library. But The . 

Andsor Collection is not a 
collection of subroutines: it is 
a seamless, integrated, inter- 
active environment, specif- 
ically designed to expedite 
application development. 

Whether you use C, 
Pascal, Cobol, Fortran, Basic, 
or any other language, The 
Andsor Collection can en- 
hance your applications dra- 
matically. Whether you add 
functions to an old program, 
or you write a new one, you 
can make them faster, more 
efficient, and more appealing. 

Use The Andsor Collec- 
tion to implement an entire 
application, or just portions of 
an application. You can, for 
example, create a windowed 
environment, add attractive 
data entry functions, define 
indexed data file structures, 
produce sophisticated reports 
or forms, and so on. 


THE BEST OF BOTH WORLDS 








Although The Andsor Collection has far more features 
than other development systems, it is only one tenth their 
size. So the entire system can stay in memory, keeping all 
functions instantly accessible. 

And The Andsor Collection is famous for its unique 
interactive environment. There is no conversion or transla- 
tion — modify a procedure, a file definition or relation, a 
data entry screen, or anything else, and the change takes 
effect immediately, even while the application is running! 
Application development is a new experience. 

The application users will benefit too. The Andsor 
Collection is amazingly fast, and since all data is in vari- 
able length format, the files take a fraction of the space 
needed with other systems. So not only will you develop 
your applications sooner, but they will be more efficient 
too. Whether you use The An- 
dsor Collection alone, or to 
enhance a program. 

So get the best of both 
worlds. Order The Andsor 
Collection today, and discover 
a whole new environment, 
without giving up your old 
development tools or your ex- 
isting applications. Moreover, 
The Andsor Collection will be 
useful with all your future ap- 
plications and languages. 

You won’t find a better 
value in development soft- 
ware: one program that is 
both a powerful stand-alone 
application development sys- 
tem, and a unique language 
independent collection of soft- 
ware tools; plus the run-time 
interpreter with unlimited 
royalty-free distribution. All 
for an incredibly low price. 
And with our 60 day money 
back guarantee*, you have lit- 
tle to lose and a lot to gain. 





“‘We looked at several systems and de- 
cided to standardize on The Andsor Col- 
lection. We are using it in many applica- 
tions in several departments.” 
Gordon Eyers, Director of In- 
formation Services, Public Utilities 
Commission, Brantford, Ontario 


‘“‘With The Andsor Collection we have 
achieved faster development and more 
efficient applications, which is important 
in large and complex projects like our 
Court Management System.” 


Dr. Mark Schrager, Consultant, 
Municipal Computer Services, 


“The Andsor Collection is unequalled 
when we need a solution in a hurry. Ap- 
plications that we have implemented in- 
clude modeling, data acquisition and 
analysis, and reporting.” 
Joe Blask, Engineering Support, 
General Motors, Troy, Michigan 


Rochester, New York 





ANDSOR RESEARCH INC. 
390 Bay Street, Suite 2000 
Toronto, Ontario MSH 2Y2 
(416) 245-8073 





*Price includes shipping in the U.S. and Canada. Please add $10 for shipping 
to other countries. If you return the software, $8 will be deducted from the re- 


fund, to cover our shipping cost. 


System requirements: any IBM PC or PS/2 or fully compatible, 250K + on eo other 
} .O+ or 


© 1988 Andsor Research Inc. Andsor is a registered trademark and The Andsor Collection is a trademark of Andsor Research Inc. 


programs), one disk drive or hard disk, monochrome or color monitor, 


IBM is a registered trademark and IBM PC, PS/2, OS/2 are trademarks of IBM Corporation 





$ 1 45 (includes shipping*) 


Visa, MC, AmEx, Check 


To order call toll free 
(U.S. and Canada) 


1-800-628-2828 
Ext. 535 
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ments. Still, it saves time when you 
don’t have to drop out of the editor 
to compile, then reenter it to fix 
errors. 

I use Brief a lot, and aside from 
the window-changing problem men- 
tioned earlier, there's only one thing 
about it that really annoys me. That 
is that you can't use the gray aster- 
isk to type the multiplication sym- 
bol; you must use Shift-8. Brief re- 
gards the gray asterisk as a synonym 
for ALT-U (Undo). I should probably 
reconfigure the keyboard, which 
Brief lets you do, but I haven't got- 
ten around to it. 

Brief comes on two floppies and 
with two spiral-bound manuals in a 
slipcase: a 161-page editor reference 
and a 195-page macro language 
guide. Both contain comprehensive 
tutorials written in English. The 36- 
page editor tutorial gets you produc- 
tive with this excellent program- 
mer’s tool in about an hour. 

Like I said, it’s terrific. 

by Kent Porter 


Guidelines C+ + 


Product: 

Guidelines C+ +, Version 1.2 
Target: 

PC and compatibles 

Requires: 

DOS 2.1 or later; 800K of hard disk 
space; 640K of RAM; and Microsoft C 
Version 3.0 or later 

Pricing: 

$295; 

owners of previous versions $25 
Vendor: 

Guidelines, P.O. Box 749, DDJR 
Orinda, CA 94563 

(415) 254-9393 or (415) 254-9183 





f you've been programming in C 

for a while, enjoyed structures 
and pointers to functions, and real- 
ized that there is something some- 
one could do to structure the pro- 
gramming even more, you've likely 
already postulated a language like 
C++.C++ is still fairly new (sort 
of like C was in 1987), not terribly 
popular (yet), and extremely power- 
ful. 

C++ is an object-oriented lan- 
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guage, which means, in short, that 
more emphasis is placed on the de- 
sign of objects and object manipula- 
tors than on functions and proce- 
dures. Like C, C+ + was deveoped 
by AT&T. Version 1.2 is their third 
release following Version 1.0 and 1.1. 
Guidelines’ C+ + for MS-DOS Ver- 
sion 1.2 is ported from the AT&T 
release of the same number. 

It's important to note that the 
C++ translator is not a compiler, 


‘but rather works in conjunction 


with one. A C++ program is first 
preprocessed, then translated to C, 
then compiled by a C compiler. 
C++ is, though not strictly, a su- 
perset of C and most C programs 
will flow through the preprocessor 
and translator unchanged. In fact, 
some of the extensions to C that the 
ANSI committee has adopted were 
introduced in C+ +. 

I found this package easy to in- 
stall and flexible enough to deal 
with such things as alternate drives 
and directories than those recom- 
mended. I would have liked the op- 
tion to install the package in the 
same directories as the C compiler 
it worked with, but it’s easy to rear- 
range the directories later. 

Several subdirectories are created 
within the main program directory. 
The LIB directory holds the librar- 
ies, one each for the five standard 
memory models. The INCLUDE di- 
rectory contains all of the AT&T sup- 
plied headers, modified only enough 
to avoid conflict with the Microsoft 
headers. The SZAL directory holds 
information for each memory model 
about the size and alignment of dif- 
ferent sized objects, none of which 
you should ever need worry about. 
The SCR directory contains a direc- 
tory for each of the chapters in the 
Stroustrup book, plus the source 
code for a batch file builder. The 
DOC directory contains documenta- 
tion on the C+ + preprocessor and 
the C++ translator, as well as a 
copy of the tutorial chapter of the 
manual. 

The last directory created is the 
BIN directory which contains the 
EXE files for the C+ + preprocessor 
and translator, as well as the batch 
file builder. Also in the BIN are 24 


batch files (built with batch file 
builder) that take .CPP files to .CI 
(preprocessing done), to .CC (transla- 
tor output), to OBJ (compilation com- 
plete), or to .EXE for each of the five 
memory models plus a default. 

Batch files are provided to allow 
the translator more working mem- 
ory. Of course, MAKE could be used 
to invoke all of the appropriate pro- 
grams individually, but more mem- 
ory is absorbed by the MAKE utility 
than by the built-in batch file proc- 
essor. 

The Bjarne Stroustrup book, The 
C+ + Programming Language, is in- 
cluded but may be omitted to save 
$10. The AT&T release notes are 
also provided which document dif- 
ferences between C and C++ as 
well as the differences between 1.0, 
1.1, and 1.2 of C+ +. An installation 
guide and tutorial (really a series of 
examples) round out the documen- 
tation. 

Free support is by mail only, un- 
less you pay $50 per year to have 
access to telephone technical sup- 
port. I'd prefer that they allowed 
some sort of phone access for a 
short period after acquisition (NOT 
registration). On the other hand, $50 
doesn't seem unreasonable, and in 
the worst case, you can think of the 
price of the package as $345 and 
purchase the first year at the same 
time as the package. 

Finally, from my contact with 
them, Guidelines seemed like rea- 
sonable people and I suspect that 
they would allow some simple ques- 
tions to be answered without 
charge. At least they answered the 
questions I had during installation. 
I found few glitches in the package, 
none serious, just annoying. I liked 
the fact that all of the chapter direc- 
tories included a makefile, however, 
the makefile SUFFIXES command 
was not quite complete lacking the 
EXE extension. This “bug” has been 
reported and will likely be fixed long 
before you get yours. Overall, I liked 
the package, and given sufficient free 
time to learn yet another language, 
I'll use it regularly. 

by Richard Relph 
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For example, I prepared the mini- 
mal dynalink module shown in - 
Example One, and compiled it with 
IBM C/2 using the options —c —Gs 
—-ALu which, literally translated, 
mean compile only, no stack checks, 
large model with no dependency on 
DS. Then I tried to link the object 
module with the definition file 


LIBRARY APROC 
EXPORTS aproc 


which requests linking a dynamic 









int far pascal aproc (char far kargl) 
{ 


char locv(8]; 













locv [2] = *ar 11 








return (Locv{2]); 


Orla 


mee 


The look and feel of Unix ona PC! | 
PC-SH - $4500 


e includes Korn Shell features ¢ built-in commands 





© command history 

© command editing 

© command aliasing 

e for, while, case, if, elif, else 


PCMACS - $4500 


PC-UTIL 


e debugging capability 
e shell variables 
e Unix regular expressions 


link library. The link reported an 
unresolved external of ____acrtused, 
which I recognized as an entry point 
into the C setup routines. When I 
supplied the C runtime library, the 
link pulled in all of the C setup code 
and generated an unresolved extern 
for __main! I circumvented this by 
adding the line 


void __acrtused( ){ } 


to my module. This satisfied the 
external reference, and in fact the 


















void acrtused{) {} 







static double bignum = 0.0; 






int far pascal aproc(char far *argl) 






{ 






bignum += *argl; 





return (bignum) ; 






CQL QUERY SYSTEM 
Both for $395.00 ansi x3.135 


Add SQL compatible ad-hoc query capability to your 


generated code did not actually call 
the dummy ——acrtused function. 
Thus finagled, the module did 
link and would have worked as a 
dynamic link package. But when I 
changed it to use a floating point 


number, as shown in Example Two, 


the link failed with many unresolved 
externs in the float libraries. These 
float routines are known not to be 
reentrant, so they can’t be used in 
dynamic link code. Neither can the 
C library routines for file I/O. 

In short, it is possible to build 
dynamic link packages using the offi- 
cial OS/2 C compilers. You have to 
know the ins and outs of the com- 
piler very well, restrict the code to 
integer arithmetic, and do all I/O by 
way of calls on OS/2 system func- 
tions instead of the C library (this 
last is no great hardship, as the OS/2 
system functions are quite com- 
plete). With other languages and com- 
pilers, good luck! 


new and existing applications 


Layered system includes CQL Interpreter, embedded 
CQL Library, Portable Windowing System, Screen I/O 
System, and Report and Form Generation Systems. 


Complete C Source code included. 


Portable Application 
Support System 


COMPATIBLE 


Hardware Independent 
Interfaces provided for IBM/screen memory. IBM/BIOS, MS-DOS generic 
(ANSI.SYS), and Xenix (table driven multi-terminal interface adaptable 


e full feature screen editor © window size definition 
e file encryption capability © one key editor functions 
e multiple file editing e temporary file buffering 


PC-UTIL - $4500 to other multi-user systems). 
banner bdiff cal Cat cb cd ; 
cflow chmod cmp col comm cp Compiler Independent 
Lae Be fe dd df ws Tested with Microsoft V4.0. Lattice V3.1. Lattice V2.15. Aztek (Manx). 
u echo env expr alse pa 
frep fil find grep head ioin Xenix System V Version 1.2. 
abe ine lpr Is make mkdir : 
more mv mvdir od pack paste — oe pudependent 
pg pr proof pwd rm rmdir Interfaces provided for C-tree (trademark of Faircom) and BTRIEVE 
set sleep sort Split strings sum (trademark of SoftCraft Inc.). 
tabify tail tee test time true 
touch tr tsort uniq unpack — units Complete I/O Control 
unset wc whence and more! 


Data types include 8-bit binary, 16-bit binary, 16-bit unsigned binary. 
32-bit signed binary, Monetary, 32-bit floating point. 64-bit floating 
point, 32-bit date, 32-bit time. 


SPECIAL te All 3 for only $9999! 
GACON Corporation 
P.O. Box 415 e Convent Station, NJ 07961-0415 
Mail orders add $1.50 P&H. N.J. residents add 6% sales tax. 
VISA/MC orders: (201) 729-1696 — 30 Day Warranty 
And, of course, full documentation is included! 


“Unix and Ksh are trademarks of AT&T Bell Laboratories 
*PC-SH, PCMACS, and PC-UTIL trademarks of Vegacon Corporation 


Machine Independent Software Corporation 
1415 Northgate Square #21B 
Reston, Virginia 22090 (703) 435-0413 
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Forms, 
Data Input 


Screens 
& Windows 


DOS Error 
interface Handling 





C-Worthy Interface Library helps you smoothly pull together all aspects of an excellent Human Interface. 


C Programmers: Wrap an Exciting, 
Bullet-Proof Interface Around 
Your Code Quickly. 


Introducing... 
C-Worthy® Interface Library 


The only human interface package 
you need. That’s what our customers 
are telling us. One early adopter, 
Novell, Inc. uses it exclusively in the 
development of their NetWare® 
Utilities, which reach over 500,000 
users. You see, C-Worthy Interface 
Library is the only library available to 
handle every aspect of your program’s 
human interface, all in one package. 
Now your programs will have a 
consistent look and feel. You no longer 
have to integrate pieces of libraries 
from different manufacturers. 

As important as you know users are, 
you often don’t have the time to heavily 
invest in writing routine code. And 
that’s OK, because with over 400 tight, 
ready-to-use functions, C-Worthy 
Interface Library takes care of the 
tedium and lets you spend your time 
doing what you enjoy. Concentrate on 
the heart of your application — features 
that make it unique, special. Let 
C-Worthy Interface Library do your: 

e Menus 

e Error Handling 

e DOS Interface 

e Context Sensitive Help 
e Screens, Windows 

e Forms, Data Input (ptiona) 


You control color, size, border, 
location, etc. And if there’s anything 
you want to change, you can. Source is 
available to provide you with the 
flexibility you need. And you can 
distribute your applications freely, with 
no royalties. 


C-Worthy Interface Library requires hard disk media with 256K 
RAM. MSDOS 2.0 + and IBM PC, or compatible, TI Professional, 
NEC APC III, or VICTOR 9000. C-Worthy is a registered 
trademark of Custom Design Systems, Inc. 





“C-Worthy is a comprehensive C library whose 
time has come. I heartily recommend it as your 
next purchase.”’ —Computer Language, 8/87 


Tech Specs 


™ Compilers: Microsoft 3.0+, Quick, Turbo, 
Lattice. All models. 


w= 350+ functions written in C, 75+ in 
Assembler. 

™ Menus: Fully support pop-up, Lotus style, 
MS Windows style (pull-down), pull-up. 

® Errors: DOS, program, and user. 

w DOS Interface: 62 functions. File handling, 


dir. and drive management, date & time 
conversion, wildcards, more. 


= Help: System and context sensitive. 

= Screens: Screen display, color palettes, save, 
restore, scroll, more. 

2 Windows: Exploding, tiled, pop-up, 
overlapping. Direct video access and virtual. 
Up to 50 active at any time. 


mw Keyboard Handling: Regular, function, 
interrupt, background procedures. 


wz Editing: String and word wrap text. 


= Form Interface Library: 118 functions. 
Over 15 field types, and user definable field 
types. 3 levels of data validation: type, 
multiple field ranges, optional validation 





C-Worthy Interface Library: 


procedures. Hide, lock, or secure a field. Object only ................64...$ 195 
Optimal field movement. Form Interface Library add-on... ..$ 100 
> Foreign Languages: All text messages in Object with Forms $ 295 


separate files for easy translation. 
= Compatible with MS Windows. 
B OS/2 special overlay when released. 


B= Machines: Autodetect for MDA, CGA, 
EGA, VGA, TI, AT&T, Victor. 


B® No royalties. 


Object with Forms & Library Source. . .$ 495 
Please specify compiler and version when ordering. 





To Order Call 


(800) 821- 2492 
in MA (617) 337-6963 


“I heartily recommend this package.” 
— David A. Schmitt, president, Lattice, Inc. 


Over 400 developers in 16 countries already use it. 


Thorough Documentation 


Indexed alphabetically and by category, 
the 700+ page Reference Guide includes 
for each function: an example, description, 
calling conventions, return values, and 
related functions. The 250 page User’s 
Guide gets you going with its tutorial 
and “Getting Started” sections. 
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541-D Main Street, Suite 410 
South Weymouth, MA 02190 





PROGRAMMER’S SERVICES 


OF INTEREST 





Languages 
Coral Software Corp. and Franz 
Inc., in a combined development ef- 
fort, have announced Allegro CL, a 
complete implementation of Com- 
mon LISP for the Mac II. The prod- 
uct features an incremental native 
code compiler, object-oriented pro- 
gramming capabilities, a program- 
mable EMACS-style editor, and ad- 
vanced debugging tools such as a 
window-based inspector and step- 
per. These are fully integrated into 
the Macintosh user interface to cre- 
ate an unparalleled LISP program- 
ming environment. Thus, Allegro CL 
allows the Mac to function as an 
independent AI workstation. 
Allegro CL requires 1-Mbyte RAM 
and 1.6 Mbyte of disk storage. It 
runs on both 68000 and 68020 CPUs, 
directly supports the 68881 math 
coprocessor, and runs on Macin- 
toshes with large screens. The prod- 
uct sells for $399.95. Reader Service 
No. 24. 
Coral Software 
P.O. Box 307 
Cambridge, MA 02142 
(617) 547-2662 


The Golden Common LISP (GCLISP) 
Developer 286, Version 3.0 is avail- 
able from Gold Hill Computers. 
The new version features a compiler 
which strictly adheres to the com- 
plete semantics of Common LISP, 
faster load times, an expanded 
GMACS editor for easier manipula- 
tion of LISP syntax, and support for 
Portable Common Loops, a flexible 
object programming system. The 
GCLISP Developer also comes with 
the San Marco LISP Explorer, an 
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interactive tutorial developed by San 
Marco Assoc.; the GCLISP Reference 
Manual; User's Guide; the second 
edition of LISP by Winston and 
Horn; and the Common LISP Refer- 
ence Manual by Guy Steele. Reader 
Service No. 25. 

Gold Hill Computers 

163 Harvard St. 

Cambridge, MA 02139 

(617) 492-2071 


PowerLisp Version 2.0, from Micro- 
Products, offers complete support 
for Common LISP and InterLISP-10 
as well as Common LOOPS. Power- 
Lisp supports the complete Com- 
mon LISP standard. The product is 
available for the IBM PC AT, Intel 
386, and VAXmate. PowerLisp for the 
286 is $2,195 and for the 386 is 
$2,995. Reader Service No. 26. 
MicroProducts 

370 W. Camino Gardens Blvd. 

Boca Raton, FL 33432 

(800) 553-0777 


Digitalk is now shipping release 2.0 
of Smalltalk/V, a PC-based implemen- 
tation of the Smalltalk programming 
language. The new release supports 
the high-resolution graphic modes 
(640 X 480) of the IBM PS-2/25 and 
30 computers and includes window- 
ing enhancements. 

Smalltalk/V Release 2.0 is priced at 
$99.95. Registered owners of earlier 
releases may obtain upgrades for 
$25. Reader Service No. 27. 

Digitalk 7 
9841 Airport Blvd. 

Los Angeles, CA 90045 
(213) 645-1082 


Trilogy is a new programming lan- 
guage developed by Complete 
Logic Systems that combines pro- 
cedural programming, declarative 
programming, and database program- 
ming. Trilogy comes with its own 
environment including editor, mod- 
ule library, interactive compiler (pro- 
ducing native 8086 and 8087 code), 
online linker, loader, and context 
sensitive help screens. Users can 
edit, compile, link, and execute mul- 
timodule programs without ever leav- 
ing the Trilogy environment. The 
product also comes with four stan- 


dard modules called Math, Strings, 
Files, and Windows. These modules 
export routines (in that order) for 
transcendental functions, string/date/ 
time manipulation functions, file ac- 
cess functions, and windowing func- 
tions. 

| Trilogy runs on the IBM PC, IBM 
PC AT and XT, and compatibles us- 
ing DOS 2.1 or later, uses 512K, and 
is not copy protected. It is priced at 
$99.95 US. Reader Service No. 28. 
Complete Logic Systems 

741 Blueridge Ave. 

North Vancouver, B.C. 

Canada V7R 2J5 

(604) 986-3234 


Books 

McGraw-Hill has published a new 
book called A Comprehensive Guide 
to AI and Expert Systems: Turbo 
Pascal Edition by Robert Levine, Di- 
ane E. Drang, and Barry Edelson. 
The book offers full explanations of 
the basic concepts of artificial intelli- 
gence and expert systems and also 
shows how AI techniques can be 
implemented on a personal com- 
puter. Complete discussions exam- 
ine a wide range of important top- 
ics, including natural language pro- 
cessing, forward and backward chain- 
ing, and the use of probability and 
fuzzy logic in expert systems. As- 
pects such as object-oriented expert 
systems, semantic nets, certainty fac- 
tors, automated learning, using 
PROLOG to design expert systems, 
and LISP are also explored. The 
book sells for $19.95. Reader Service 
No. 29. 

McGraw-Hill Book Company 

11 W. 19th St. 

New York, NY 10011 

(212) 337-5945 


Structured Induction in Expert Sys- 
tems, by Alen D. Shapiro, is a new 
book published by Addison-Wesley 
which shows how the knowledge 
acquisition process can be auto- 
mated by the application of induc- 
tive learning techniques. It provides 
a guide to techniques for the synthe- 
sis of transparent rules from exam- 
ples supplied by the domain expert. 
It also shows applications of these 
techniques to complex problems in 
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4 Reasons 
Why the MKS Toolkit Is a 
Very Large Package for a Small Price: 


It contains the UNIX full-screen editor VI/EX 
— and handles the various national character sets provided with DOS, as 
@ well as 8-bit data and improved support for EGA and colour attributes. 


It comes with a complete KORN SHELL 
— a programming language in itself including vi and emacs command- 
@ ine editing mode. 


It has the only version of AWK available under DOS 

— written to the latest Bell Labs specifications for System V.3, allowing 
Q multiple-subscripted arrays; awk is an excellent fourth generation lan- 

guage that even non-programmers will find readily accessible. 


Besides all this it comes with over 110 commands 

— including init, login, passwd, and who to facilitate multiple users of 

the same machine, or multiple application environments; pr and fmt for 
Q formatting files; crypt for file encryption; pack, unpack, and pcat for 

data compression; and the familiar commands such as: cat, cpio, date, 

diff, du, find, grep, head, Ic, od, pg, sed, sort, tail, tr, wc, and much 


| All for $139. 


Other MKS products available for DOS: 


MKS RCS (Revision Control System): Using MKS RCS, programmers, systems adminis- 
trators, project managers, and software librarians can efficiently control and record 
the revisions of text files such as programs, documentation, graphs, papers, form 
letters, and so on. It maintains a complete history of changes, including date and time 
of change, author, and reason for the change, and allows retrieval of any version of the 
file, by date, release number, or a user-assigned name. 

Now available separately: 
MKS AWK: The 4th generation language fully compatible with the latest description in 
The AWK Programming Language, by Aho, Weinberger, and Kernighan. MKS AWK with 
tutorials and documentation: $75. Both the software and The AWK Programming 
Language: $89. 
MKS Vi: the screen editor running under DOS at lightning fast speeds — it’s tuned for 
the PC. Comes with Tutorial and Reference Manual for $75. 


Mortice Kern Systems Inc., 
55 King Street North, Waterloo, Ontario, Canada, N2J 2W9 (519) 884-2251 
uucp: (allegra, decvax, ihnp4 }!watmath! mks! toolkit 


BIX userid: mks CompuServe userid: 73260,1043 
MKS software runs under MS-DOS 2.0 or later. Not copy protected. Prices quoted in US funds. VISA, 
MASTERCARD, American Express, uucp, and purchase orders (over $200) are accepted. Overseas orders 


please add $15 for postage and handling. MKS is a registered trademark of Mortice Kern Systems Inc. UNIX is 
a trademark of AT&T Bell Labs. 
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chess end-game classification. This 
book can be used as a supplement 
for graduate-level courses on expert 
systems and AI programming. The 
suggested retail price for the book is 
$31.25. Reader Service No. 30. 
Addison-Wesley Publishing 

Reading, MA 01867 

(617) 944-3700 


Expert Systems 

OPS83, by Production Systems 
Technologies is a rule-based pro- 
gramming language that was de- 
signed as a tool for developing and 
delivering knowledge-based, second 
generation expert systems. The lan- 
guage is not restricted to merely 
diagnostic or classification tasks. 
Code written in OPS83 can easily be 
interfaced to code written in other 
languages. Reader Service No. 31. 
Production Systems Technologies 
642 Gettysburg St. 

Pittsburgh, PA 15206 

(412) 362-3117 


VP-Expert from Paperback Soit- 
ware is a rule-based expert system 
development tool. Features include 
a built-in text editor, an inductive 
front end that creates if-then rules 
directly from examples in external 
files of other programs, an inference 
engine, floating-point arithmetic and 
trigonometric functions, confidence 
factors, text and graphic tracing, and 
external program calls. 

VP-Expert runs on the IBM PC, 
IBM PC AT and XT, IBM PS/2, or 
compatibles with 384K, uses MS- 
DOS 2.0 or later, and is not copy 
protected. The product sells for 
$124.95. Reader Service No. 32. 
Paperback Software International 
2830 Ninth St. 

Berkeley, CA 94710 
(415) 644-2116 


The Berkshire Soitware Com- 
pany has released Turbo Shell Ver- 
sion 2.0, a software system designed 
to provide a complete environment 
for the development of expert sys- 
tems. The product provides menu- 
driven facilities for creating, modify- 
ing, and consulting knowledge bases 
comprised of rules, facts, and solu- 


| tions. The system is based on the 
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* Ada is a registered trademark of the U.S. Government (AJPO). 





@ Apollo, H-P and Sun Users; 
and now, for the MAC IL too. 


For 68000 Ada 


Builds Unique Project Environment 


Organizations serious about the 680X0 
architecture, and serious about working 
with the government, want a lot more than 
just validated Ada compilers. They want 
quality solutions; production quality com- 
pilers and quality programming tools. 
Just what Alsys offers. Alsys’ new 

68000 Ada Developer's Toolset includes: 

¢ AdaProbe, a unique source-level sym- 
bolic debugger and program viewer; 

¢ AdaXref, an inter-unit cross- 
referencing utility; 

* AdaReformat, a pretty printing tool for 
reformatting source files to selectable 
conventions; and 

* AdaMake, an automatic recompilation 
facility. 

Consider, too, all those special Ada 


‘manager tools” that are part of the 


Alsys Version 3 compilation system: 
the Family Manager, the Unit Manager, 
and the Library Manager. 


Together, they implement the new 
Alsys Multi-Library Environment that 
allows teams of programmers to share 
thousands of logically organized 
compilation units. 

Alsys 68000 compilers are in a class 
by themselves; highest code quality, 
maturity, reliability, robustness, superior 
optimization technology, unexcelled error 
messages...And now, with the new 
development tools, they are at the core of 
an Ada project environment unique in 
the industry. 

Alsys 68000 compilers and our new 
68000 Ada Developer's Toolset are now 
available for the Apollo Domain, Sun 3, 
Apple Macintosh II, and H-P 9000/ 
Series 300. 

Ada is NOW. Alsys solutions are NOW. 
Call or Write. 


SUS 





In the US: Alsys Inc., 1432 Main St., Waltham, MA 02154 Tel: (617) 890-0030 
In the UK: Alsys Ltd., Partridge House, Newtown Rd., Henley-on-Thames, Oxon RG9 1EN Tel: 44 (491) 579090 
In the rest of the world: Alsys SA, 29 Avenue de Versailles, 78170 La Celle St. Cloud, France Tel: 33 (1) 3918.12.44 


Name 
Company 
Address 
City 
Phone 
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OF iNTEREST 
(continued from page 146) 


classic MYCIN model of expert sys- 
tem development using production 
rules for the classification of knowl- 
edge. Turbo Shell can be requested 
to provide an explanation of its logic 
and line of reasoning in pursuit of a 
conclusion, and will provide a com- 
plete explanation when a conclu- 
sion has been reached. 

The Turbo Shell expert system de- 
velopment environment is written 
entirely in Turbo PROLOG. The pack- 
age sells for $89 and runs on IBM 


sided floppy-disk drive and at least 
256K of RAM. Reader Service No. 33. 
The Berkshire Software Company 
44 Madison St. 

Lynbrook, NY 11563 

(516) 593-8019 


Miscellaneous 

AI-NET 101 from AI Ware is a data 
analyzer based on neural net tech- 
nology. It autonomously learns pat- 
terns among input samples using 
techniques inspired by knowledge 
of the human brain's learning proc- 
esses. AI-NET 101 operates in real- 
time and is suitable for integration 


into industrial environments. Its 


If You Have Turbo C You Have 
Half Your C- s rogramauns Vehicle 


PCs and compatibles with one dual 




















Turbo C is a great compile bi 
one vital cog missing —de 
Without it, you have to sf 
lot of energy to go a shot 





G simpel Software’s C-te 
nized as the leading C i i te 


interactive Denigeer 0 
debugging facilities include : 
screen (code in upper portio 
dialog in lower), breakpoint 
(sticky, temporary, line/fun: 
directed), display of s 
execution of any expression (even those 
involving macros), function traceback 
with arguments, watch expressions and 
watch conditions (watchpoints). Our 
watch expressions can be structs or 
arrays. We catch out-of-bounds pointers! 


The missing wheel that will 
turn your half-cycle into a bicycle 


C-terp 


Order C-terp today! 
Call (215) 584-4261 


No Toy — Full K&R with ANSI enhance- 
ments. Multiple-module with a built-in 
automatic make. It has virtual memory 
option (with optional direct use of ex- 


tended memory) and a shared symbol Introductory Price for Turbo C-terp: 


option for those big programs. It supports $139.00 
graphics, dual displays and the EGA VISA, MC, COD — 30 day money back 
43-line mode. Shige guarantee 


Links to external libraries — (both code 
and data, automatically) which can call 
back to interpreted functions. Function 
pointers are compiler compatible. 


C-terp Version 3.0 is also available for the 
following compilers: 

Microsoft, Lattice, Aztec, C86, and Mark 
Williams ($298) and Xenix ($498). 





100% Turbo-C compatible. —Same 
header (.h) files, data alignment, bit field 
orderings and preprocessor variables as 
your compiler. We link in your com- 
piler’s library. 


Cituee SOFTRRE 


3207 Hogarth Lane 


Our reconfigurable editor —is multifile Collegeville, PA 19426 


and comes with a configuration script to 


ie C-terp is a trademark of Gimpel Software. and Turbo-C of 
mimic Turbo’s editor. 


Borland International. 
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modular design allows several nets 
to be connected into a single sys- 
tem. AI-NET 101 uses proprietary 
software that takes advantage of the 
neural net’s internal structure to in- 
crease its learning performance. AI- 
NET 101 uses a Microsoft Windows 
interface. The AI-NET accelerator 
card, which fits into the IBM PC, 
increases learning speeds up to 10 
times and more. The product sells 
for $4,500. Reader Service No. 34. 

AI Ware Inc. 

11000 Cedar Ave., Ste. 212 

Cleveland, OH 44106 

(216) 421-2380 


CLOE is a new software package 
developed by Symbolics that is a 
software environment for both the 
Symbolics 3600 product line and In- 
tel 80386-based personal computers. 
CLOE consists of three software mod- 
ules—one for delivery and two for 
application development and fine 
tuning. For delivery, CLOE Runtime 
executes the application on the tar- 
geted 80386-based delivery machine. 
This software module is a native 
80386 Common LISP runtime plat- 
form with extensions such as multi- 
tasking, support for new flavors ob- 
ject-oriented programming | lan- 
guage, advanced exception handling 
facilities, and a high-performance gar- 
bage collector. For development, pro- 
grammers will need the 3600-based 
Developer software module and the 
companion 80386-based Application 
Generator. 

CLOE Runtime requires an Intel 
80386-based PC or workstation, Unix 
System V, Release 3.0, 2 Mbyte of 
RAM and a 20-Mbyte hard disk. 
Prices vary according to licensing 
configuration. Reader Service No. 35. 
Symbolics Inc. 

11 Cambridge Center 
Cambridge, MA 02142 
(617) 621-3727 
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VERY HIGH RESOLUTION 


The PC Tech COLOR and MONOCHROME video processor boards employ the TMS 34010 
high performance graphics co-processor to insure the best possible video performance 
at reasonable prices. 


Color 34010 Video Processor: 

e Featured on the cover of 
Micro Cornucopia. 

e From 800 x 512 through 
1024 x 800 resolution (depending 
on monitor and configuration). 

e 8 Bits per pixel for 256 
simultaneous colors 

e Hardware support for CGA/MDA 
emulation. 


e PC, XT, and AT compatible 





The PC Tech Color 34010 video processor is a superior 34010 native code and DGIS development tool. 
We support up to 4 megabytes of program (non-display) 34010 RAM as well as up to 768K bytes of display 
RAM. Compare our architecture and prices to any other intelligent graphics board. Then choose the PC 
Tech Color 34010 Video Processor for your development engine and your production requirements as well. 


Color 34010 Video Processor .....................°1,195.00 


Price includes 512K display RAM, 1024K program RAM, and utility software. Monitor not included. 
Also available: DGIS, 34010 C compiler, assembler, 34010 fractal software, 
additional display and program memory, and various monitor options. 


PC Tech Monochrome 34010 Video Processor and Monitor 


e 736 x 1024 resolution (other options available) 

e 2 bits per pixel for 4 hardware gray shades 

e Hardware support for CGA/MDA/Hercules emulation 

e PC, XT, and AT compatible 

e Full page 66 line text editing with many popular editors 
e Excellent windows 2.0 application development system 


The graphics and bit manipulation capabilities of the TMS 34010 make the PC 
Tech Monochrome 34010 Video Processor 66 line full page text and graphics 
display faster than many 25 line systems. The video processor is available 
separately or with the high resolution white phosphor monitor shown above. 


Monochrome 34010 Video Sub-System......... .*1,295.00 


Price includes Monochrome Video Processor and monitor pictured above. 
Also available: DGIS, Tl 34010 C compiler, Tl assembler. 
Monochrome 34010 Video Processor also available separately. 





| 
| 
i 
| 
| 
4 Designed, Sold and Serviced By: 


| aad ee, Mewes oe 
" 904 N. 6th St. 
Lake City, MN 55041 
(612) 345-4555 
‘Qs! (C (612) 345-5514 (FAX) 


IS, Hercules, and Windows 2.0 are trademarks or registered trademarks of their respective companies. 
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Upgrade Your Technology 


We’re Programmer’s Connection, the leading 
independent dealer of quality programmer’s 
development tools for IBM personal com- 
puters and compatibles. We can help you 
upgrade your programming technology with 
some of the best software tools available. 
Comprehensive Buyer’s Guide. The CONNECTION, 
ournew Buyers Guide, contains prices and up-to-date 
descriptions of over 600 programmer’s development 
tools by over 200 manufacturers. Each description 
covers major product features as well as special re- 
quirements, version numbers, diskette sizes, and 
guarantees. 

How to Get Your FREE Copy: 1) Use the reader ser- 
vice card provided by this journal; 2) Mail us a card 
or letter with your name and address; or 3) Call one 
of our convenient toll free telephone numbers. 


lf you haven’t yet received your copy of the 
Programmer’s Connection Buyer’s Guide, act 
now. Upgrading your programming technol- 
Ogy could be one of the wisest and most 
profitable decisions you'll ever make. 


386 products List Ours 
386 ASM/386 LINK Cross Asm by Phar Lap ..........00.+. 495 377 
386 DEBUG Cross Debugger by Phar Lap .......ccccccccc0.- 195 129 
NDP C-386 by MicroWay 0.0.0... cccecccccccscscececeeeee New 595 6529 
NDP ForTran-386 by MicroWay..............cccccccece. New 595 529 
PC-MOS/386 Single-User by The Software Link............ 195 155 
PC-MOS/386 5-Users by The Software LINK ........c0c00.:. 595 539 
PC-MOS/386 25-Users by The Software Link............... 995 869 
alsys products 

Ada GSA-validated w/maintenanCe ..........ccccccccscececeeeee: 3355 2975 
Ada Developer’s Toolset Volumes 1& 2 .......c0000.... 995 919 
MENEN oat eet a ek ae 200 185 

american software int’! 
DMS Resident-ASM 5.3.0... cccccccedescsescsescsssceees 150 139 
IMI 2 cisco oc boo, 150 139 
DMS Screen Master .o.0..0.0... cc ccccccccccecesesee, New 200 185 

1st-CLASS 
by Programs in Motion 
List $495 Ours $399 


1st-CLASS is a knowledge analysis tool that allows you to see 
what data is relevant in your decision making process. Data can 
be entered in a familiar spreadsheet format or directly as a 
decision tree. The graphic decision tree that you build allows 
you to clearly view your logic every step of the way. With 1st- 
CLASS, you can exchange data with databases and spread- 
sheets, interface it to other programs, operate hardware, read 
instrumentation, or use 1st-CLASS as a logic engine within your 
Own program. 





assembly language 


Cross Assemblers Various by 2500 AD...................... CALL CALL 
OPTASM by SLR SYSt€MS...........cccccccecseseeeeseeseeceeesees 195 179 
blaise products 
ASYNCH MANAGER Specify C or Pascal.......0..0......... 175 135 
PIS PLU S.O i eA cccecaencagnss 129 99 
KeyPlayer Super Batch Program ........ccccccccccceceececesee 50 3. -45 
LIGHT TOOLS for Datalight Coo... ..ccccccccccccccccese. Sale 100 55 
PASCAL TOOLS/TOOLS 2 ooo. cccecccccccccccseses. Af5-=495 
Peer F TENE FONTIAUET 0225. .sccos cass Aoceccsoescaece 50 45 
Turbo ASYNCH PLUS/4.0 ooo. cccccccee. 129 99 
MPN Ss SO A ice ed Ps cual 129 99 
Turbo POWER TOOLS PLUS/4.0.0000000. ooo, 129 99 
VIEW MANAGER Specify C or Pascal .........ccccccccccccs.. 275 199 
borland products 
EUREKA Equation SOWEF 0.........cccccccccccceccessescesescecee.. 167 105 
Paradox 1.1 by Ansa/BoMand ..........cccccccccccccsceeceecee.-. 495 359 
Paradox 2.0 by Ansa/BoMand ..........cccccccocccccee 125° ~~ $25 
Paradox Network Pack by Ansa/Borfand............... 995 725 
Quattro: The Professional Spreadsheet... 195 125 


Reflex: The Analyst 


USA........ 800-336-1166 


COI ss ve sacareecsivincactisabantkscos 800-225-1166 
Ohio & Alaska (Collect) .................. 216-494-3781 
HMB PTATNOIG <occssciciescncosicodiecowencedsace 216-494-3781 
TERE een eee 9102406879 
PAX 3 sake cian Socoeas 216-494-5260 


Business Hours: 8:30 AM to 8:00 PM EST Monday through Friday 
Prices, Terms and Conditions are subject to change. 
Copyright 1988 Programmer's Connection Incorporated 





SROOUN 2 ec barra bias eae ee Bee ee B55 SF 
SOOEOY och chsiochdn oteaaies Bloat. aes 100 64 
Turbo Basic Compiler... ccccccceceeeseeeeee 100 += 64 
Turbo Basic Database Toolbox o.oo... ccc. 100 += 64 
Turbo Basic Editor Toolbox... ccccccceeeeee. 100 64 
Turbo Basic Telecom Toolbox .................cccccccece. 100 64 
ROU GORI ee Ns 100 64 
Twn LANG i fa ht BAR Ae 100 += 64 
Turbo Lightning Word Wizard .......0.0.0.0.0.00c 70 3=— 47 
TONDO PONEO co Scan Gate oeten ns 100 64 
Turbo Pascal Database Toolbox ..0.....0...0..c.cc. 100 64 
Turbo Pascal Developer’s Toolkit ...........000.0.000000. 395 259 
Turbo Pascal Editor Toolbox ......0.0.. occ 100 += 64 
Turbo Pascal Gameworks Toolbox............0.0.0..00000. 100 64 
Turbo Pascal Graphix Toolbox ooo... cece. 100 64 
Turbo Pascal Numerical Methods Toolbox.............. 100 64 
TOO PasCRT Ws 5 re 70 = 4 
Turbo Prolog Compiler ........0...0...ccccccceeeeeees 100 += 64 
Turbo Prolog WoOlbOx. 2.3 100 64 
c language 
Eco-C88 Modeling Compiler by Ecosoft................... 100 ~@=©69 
Lattice C Compiler vers. 3.2 from Lattic€...........c.c.... 500 265 
Optimum-C by Datalight 0.0.0... ccccccccceeeseeeee 139 = 95 


Peabody Pop-Up Reference Utility 
by Copia International 


List $100 Ours $89 

Peabody is a fast and flexible on-line reference utility with 
databases available for Turbo Pascal , Turbo C, Microsoft C, 
or MS DOS. It provides instant, accurate and complete lan- 
guage information in pop-up frames at the touch of a key. With 
Peabody, you can select general topics from a structured sub- 
ject menu, or use Peabody’s hyperkey to get instant help for 
the keyword closest to the cursor. Specify database desired. 
Additional databases are available for $100 with manual or $50 
without manual. 


c utilities 


BGG DY SONG 55S). aeccicxs pbc New 75 69 

ISAM File Manager .........0.cccccccccsscscssesvscecesees New 40- 37 
C++ py Giadelines 22 a 295 259 
C-SCape Dy Oakland GIOUD ...........cccccccceseeeeeeecesees New 299 279 
OSANIIONG iss crease cet New 150 119 
CBTREE by Peacock Systems .........ccccccccceccsceseeee New 159 98 
CQL by Machine Independent Software.................. New 395 329 
Curses Window Dev Pkg by Aspen Scientific ............. 119 105 

WT SRM OMI a cet eo 289 249 
dBx dBASE to C Translator by Desktop All...........2....00.0 CALL CALL 

ORE SUITS BAN sano. ni pisses aces wo CALL CALL 
Entelekon Combo Package ...................... Clearance 200 99 
FOR_C by Cobalt Blue ...........c.ccc... New, Special Price 650 559 
GraphiC by Scientific EndeaVOFS .......0...0ccccccccccccescces-s. 395 309 
Interwork by Block Island TON ............ccccccccccc.--. New 129 115 
PANEL by Roundhill, Specify QuickC or Turbo C............. 129 95 
PANEL Plus by Rounghilll............-eccccccccccccsccosecceosece. 495 395 
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ORDERING INFORMATION 


FREE SHIPPING. Orders within the USA (including 
Alaska & Hawaii) are shipped FREE via UPS. Call for 
express shipping rates. 

NO CREDIT CARD CHARGE. VISA, MasterCard and 
Discover Card are accepted at no extra cost. Your card 
is charged when your order is shipped. Mail orders 
please include expiration date and authorized signa- 


ture. 

NO COD OR PO FEE. CODs and Purchase Orders are 
accepted at no extra cost. No personal checks are ac- 
cepted on COD orders. POs with net 30-day terms 
(with initial minimum order of $100) are available to 
qualified US accounts only. 

NO SALES TAX. Orders outside of Ohio are not 
charged sales tax. Ohio customers please add 5% Ohio 
tax or provide proof of tax-exemption. 

30-DAY GUARANTEE. Most of our products come 
with a 30-day documentation evaluation period or a 30- 
day return guarantee. Please note that some manufac- 
turers restrict us from offering guarantees on their 
products. Call for more information. 

SOUND ADVICE. Our knowledgeable technical staff 
can answer technical questions, assist in comparing 
products and send you detailed product information 
tailored to your needs. 

INTERNATIONAL ORDERS. Shipping charges for In- 
ternational and Canadian orders are based on the ship- 
ping carrier's standard rate. Since rates vary between 
Carriers, please call or write for the exact cost. Inter- 
national orders (except Canada), please include an ad- 
ditional $10 for export preparation. All payments must 
be made with US funds drawn on a US bank. Please 
include your telephone number when ordering by mail. 
Due to government regulations, we cannot ship to all 
countries. 

MAIL ORDERS. Please include your telephone num- 
ber on all mail orders. Be sure to specify computer, 
operating system, diskette size, and any applicable 
compiler or hardware interface(s). Send mail orders 
to: 


Programmer’s Connection 
Order Processing Department 
7249 Whipple Ave NW 
North Canton, OH 44720 





PC/Forms by Golden Software................0.cccce00- New 150 129 
QPARSER+ by QCAD Systems ...........c.cccccsceceees New 475 CALL 
RTC PLUS Fortran to C by Cobalt Blue ...........c.ccccceeee 450 369 
Vitamin C by Creative Programming ..............c0ccc0ccc00-. 225 149 

VC Screen Forms Designer ..............ccccccccccceseeeseee 100 79 
WKS LIBRARY by Tenon Software ......0...ccccccscseeceeeee. 129 109 

database management 
Clipper Dy Nantucket.....2....0...cccccccccccseesesseeseseseeeeeeees 695 379 
dBASE Ill Plus by Ashton-Tate ..............cccecesesceeseeeees 695 389 
OFLU ty WaON So os a ea. 149 119 
FOXBASE + by Fox Software .....c.cccccccecsseseseseseseseeseens 395 249 
FoxBASE+/386 by Fox Software ...........cccccecce New 595 399 
GONNOE Byte asc ee ee ee 395 249 
MAGI, PU DY AER 3 oe Se 199 167 
OUR Diy Syria tOC 52 es Secs enw 349 219 
R:Base 5000 by MiCMONM ........cccccccccccccccseseseseeeeeeees 495 359 
R:Base System V by MicrOnM............c.ccccccccccceeceeeee 700 439 
Ul Programmer by WallsOft.............0.0.c.cccccscsceseeeeeeee 295 239 
debuggers 
Periscope | with Board by Periscope ...........ccccccccc0000- 345 275 
Periscope II with NMI Breakout SWITCH .......0...ccccccccee. $75.49 
Periscope II-X Software ON ........c.ccccccccccscsssseeceeeeess 145 105 
Periscope Ill 8 MHZ VerSiON...............cccccccccseecesseseeeees 995 795 
Periscope Ill 10 MHZ Version ............c.c.cccccscececeseseeeee 1095 875 
digitalk products 

WOM st as eee oe a 100 +=84 

EGA/VGA Color Option 020.00... 50 45 

Goodies Diskette 41 ooo. 50 45 

Goodies Diskette #2 200.0. occc. New 50 £45 

Goodies Diskette #3 2002.00, New 50 45 

DMG ONURY: <2 ae 50 45 
SmabtaV: 266 5 alias New 200 159 

dos utilities 
Desquview from Quarterdeck ...........ccccccccescssesesesesesees 130 105 
Mace Utilities Pau! Mace Software ........0.0.c.ccccccceceeeee a 85 
XO-SHELL by Wyte Corporation ..........ccccccccscsceseseece. 49 45 
elan computer products 
RON eae ee ee ce 8 a New 695 589 
MT GS Bae ne ag aes New 99 89 
essential products 

Breakout Debugger 2.0.00... ooo ccocecccccesceseesee 125 ~=89 
© NY a kes eae ce 185 118 
Essential Communications... ...ccccccccccececse. 185 118 





Essential Communications with Break Out................ 250 


ROBOT TMIINGS os 2i5o scseees cccidiched Notvarorscselahmects: 250 
POPPIN HI oo sciks ating, Sahota Secahend 99 
WIERD DOHFDE GOR... sci -c2e oe estes: *~heoctagcdvasa.dabbergs 198 
OOO 556s ssn BE Ann as: 99 
with Library SOUCE COE ...............ccccseececesseeeseeees 198 

faircom products 
C-tree & r-tree COMDO 2.0... eects 650 
C-tree /SAM File Manage? ............ccccecesecteeseeteeteees 395 
r-tree Report Generator ........ccccccccecseeeesseeseseeesees 295 
TI SS ake RON be ep eee as hatches CALL 

gimpel products 
C-terp Specify COMPIIEL...........0.c.ccccccceceecseseeeeeseeeeeees 298 
CEI oS Soave cas esse ov poecetcniceBnactbsapiga 498 
MN ian So. talk antec ates an aes Gente 139 
Turbo C-terp for TurD0 C oi... cceccccccccscscsesesscscseeseseeeees 139 

golden bow products 
MORIN SO) ete Skt es sain aon 50 
Vfeature Hard Disk Utility ..........0.cccccccccccccecseseeseeseeees 80 
MCMMWO UMURE 2 82ers Sh Sacto tes 120 
Vopt Hard Disk Optimization Utility............c.cccccccceccceees 50 
greenleaf products 
Greenleaf C Sampler specify QuickC or Turbo C ......... 95 
Greenleaf Comm Library ........0...0...0.ccceeee, 185 
Greenleaf Data Windows Library .................00.0..0. 225 
WUT CONG go cides ote ste og cde dE BS cco 395 
Greenleaf Functions ..........0..0.0.000ccccceeeeeeee 185 
imsi products 
risC Assembler Programming TOI ................2c.c000000+ 80 
TurboHALO Specify Turbo C or PaSCal...........0.0:ccceees 80 
komputerwerk products 
Feat BASIC FOUTS Rs oe Sa hasecther ounces 99 
PANY MODUS 25.5.5 Sen. oi aso eases te New 99 
FWA BU teas deig lok wonekG we New 99 
RuleMaster2/PC 
by Radian 
List $495 Ours $389 


RuleMaster 2 is a set of software tools for the development of 
rule-based expert systems. Knowledge can be entered in the 
form you prefer, and the C or ForlTran source code generators 
allow you to easily embed an expert system within another 
program. Complete English-language explanations assist you 
in understanding the line of reasoning used to arrive at a solu- 
tion. The end-user interface is complete with pull-down menus 
and windows to enhance the ease of use of your expert system. 


lattice products 


Lattice C Compiler ver 3.2 from Lattice ...........0..0.0000.. 500 
with Library SOUPCE CODE .........20...cccceccseeteeseeeseees 900 
C Cross Reference Generator... on. 50 
C-Food Smorgasbord Function LIDPary «00.0.0... 150 
WIHT SOUTER. GUE 6s. apcad eis tap sasnens cb cbenboeepic 300 
C-Sprite Source Level DebUQGET..............00cccceeeseeeee 175 
CirGOs Sivper Ma BBC 3... Veen hes) necsinstowers as 125 
WY SOBICE: CONE: 305 eases Fok aie idaho oe eee 250 
ee aia ae se rc nse alt eeueec neon 250 
WADE SOLE COO! 500 F's bg Socads hantcoan tk 500 
BG EP WOS ati 2. or Ae ee ie 750 
WUT SNUCR GRU o5 8)... enw cee cep aetone wes 1500 
ROAR Mahe PAOMEY, SOs cS rods 0nd Bee vores 195 
RPG Il Combo Ai four items Delow .......... eee. 1400 
RPG Il Compiler Vo Royalties .........0.......ccceee. 750 
Screen Design Aid Utility for RPG I... oe. 350 
SEU Gone Entry UGB. 5x esc lotsa 250 
SONOS se ie Siok aa a! 250 
Text Management Utilities Aen ot RM tee 120 
meridian products 
AdaVantage GSA-validated .............ccccecceteeeeteeteceees 795 
WOT CNMI c, : Seokncss ig Apa ISA casa hiascds nas ese New 995 
AdaVantage Debugger.........................:008. New 495 
AdaVantage DOS Environment Package................. 50 
AdaVantage Utility Packages |... 50 
metagraphics products 
MetaWINDOW Wo Royalties ...............ccceceeeteeteces 195 
MetaWINDOW/PLUS |... eee 275 
QuickWINDOW/C for Microsoft QUICKC.................000: 95 
TurboWINDOW/C for Borland Turbe C............ccccccee 95 
TurboWINDOW/Pascal for Borland Turbo Pascal......... 95 
microport products 
DOSMerge286 Specify 2-Users or Unlimited .............. 149 
DOSMerge386 2-Users .............0ccccecceeeeeteetereeee 395 
DOSMerge386 Unlimited Users ............c::ccecceeeeceees 495 
System V/386 Combination .................0.00.ce 799 
386 Runtime System 0.00.0... cee 199 
386 Software Development System .................. 499 
Text Preparation System .......0.0...0.cce ees 199 
System V/AT Combination ..............00.0..0..ce. 549 
AT Runtime System ......:5...........:0.00- ee 199 
AT Software Development System .................... 249 
Text Preparation System .......0...0......ee. 199 


189 
183 
85 
148 
85 
154 


919 
315 
239 
CALL 


219 
379 

99 
119 


47 
74 
111 
47 


69 
125 
155 
249 
125 


65 
75 


85 
85 
85 


138 
195 


79 
79 


129 
345 
429 
669 
169 
429 
169 
465 
169 
209 
169 


microsoft products — 


Microsoft BASIC Compiler for XENIX ........c.ceccceccceeee. 695 439 
Microsoft BASIC Interpreter for XEMIX..........0.0.0.00.00.. 350 219 
Microsoft C Compiler 5 w/CodeView................0c0000. 450 285 
Microsoft COBOL Compiler with COBOL Tools ........... 700 439 
RIG sos buistsicc tthe cic itsscce tise RR eakce 995 639 
PRICING GON iif. io od Rhee wd Medan cccecs 495 319 
Microsoft FORTRAN Optimizing Compiler .............2.... 450 285 
Microsoft FORTRAN for XENMIX ...........cccccccccceeeseeeee 695 439 
WicrOSOUL MACH 20 308 ee le. 495 329 
Microsoft Macro Assembler........0.........0.00cccccccccee. 150 99 
Microsoft Mouse with Paint & Mouse Menus .............. 150 99 
with Microsoft WindowS & Paint ...0.cccccccccceecceeecceeee 200 139 
WE ERNOAD ce er eee 175 119 
Microsoft Pascal Compiler..............00000000000cc. 300 189 
fn) Sa RS es 0 A ee 695 439 
Microsoft QuickBASIC ooo... cece 99 ~=««66 
WECTUSON CREOKG oo Ske ee eee 99 66 
CHEE WIMMIOMERS Sic a ek a oe 99 ~=s«: 66 
Microsoft Windows 386.000.000.000... 195 129 
Microsoft Windows Development Kit ..................... 500 299 
WEI NE sooo vehi anes. onceeace 450 285 
WUNUSOR WHOFKE a algun 195 129 
AdaVantage Compiler 
by Meridian Software 
List $795 Ours $735 
with Optimizer: 
List $995 Ours$919 


The AdaVantage Compiler is a fast, efficient, production-quality 
Ada programming environment fully validated by the U.S. 
Department of Defense. It generates native 8086 code in intel 
standard object format. Includes: compiler, linker, library mgmt. 
tools, support packages, runtime libraries, and a configuration 
tool. The optional Optimizer offers code improvements ranging 


from local optimizations to global subprogram removal. 


mks products 


SOUR set iani eel tos ee onan 5 .~6 
MKS RCS Revision Control System .........c.ccccececee 189 155 
MKS Toolkit with MKS VI EOIOS ...........0cccceceeceeeeeeees 139 109 
MKS Trilogy with AWK, CRYPT & Kom Shell................. 119 99 
Wy NE oe Sih ach, res. atsbas dias woes 75 65 
mmc ad system products 
C Programmer’s Toolbox I.................:ccee New 80 69 
C Programmer’s Toolbox Il...........0.....cee New 80 69 
C Programmer’s Toolbox Combo.................0.... New 130 115 
modula-2 language 
LOGITECH Modula-2 Development System............ 249 199 
Modula-2 Compiler Pack................0..0..0008 99 75 
Ne TOM ia dheat este ly csenneess 169 139 
LOGITECH Modula-2 Window Pkg...................00 49 39 
MODULA-2 by Stony BrOOK ..........cccccececeteteeseeeeees 195 169 
IN TOE hice Nh sk che ety sto lasde Toe bh goes 345 299 
mouse products 
LOGIMOUSE BUS with PLUS Pkg by LOGITECH ........... 119 98 
with) PLUS & PC PaintDrUsl.......00ccccccccsseeceseeeeesreees 149 119 
with? PLUS & CAD SORWAME ....60.ccccsewclecesteeeqeesaseees 189 153 
ald PLESS © CALS CPA case's stack vec neesn stone Bd 219 179 
with PLUS & FirSt PUDIISNCL ........0ccccccceceseeseeeeeeeee 179 139 
LOGIMOUSE C7 with PLUS Package .............cce 119 98 
with PLUS & PC P@intDrUSh ....c.cccccccerecceteeteereetees 149 119 
with PLUS & CAD SOPWAPE ......cccccccccesceeneeeeteees 189 153 
wit PLUS & CADE PAW... oicsccccieebesedicccceseetenee 219 179 
with PLUS & First PUDISNEL ............cccceeceeeeeeeeeeneeees 179 139 
LOGITECH HiREZ Mouse for High-res Screens....New 149 119 
LOGITECH Series 2 Mouse for /BM PS/2............. New 99 79 
Microsoft Mouse See Microsoft Section ..............0++ 
novell development products 
Btrieve /SAV Mgr with No Royalti€S............cccceceeeee 245 184 
Xtrieve QUELY UMtlity ........ccccccsseesseessseessseseseesseeeee 245 184 
Report Option for Xtrieve...........cccceseereeeeees 145 99 
Btrieve/N for NEtWOLKS ......cccccceecesseeeseseseseeeteesesenees 595 454 
airs ei uiepapteche cask 595 454 
Report Option/N for Xtreve/N .........ccceceeceeeee 345 269 
ah seit SNe lsh Stacie Mh ce ebedsgies 795 599 
peter norton products 
Advanced Norton Utilities ........0..00.00. ee 150 89 
PRIA MOIRA oi cn sic suis anny ide cPevaetvac cade eset Foi ae 
PUNE oa Sis i lecan deettshancoeoe New Version 75 55 
Norton Guides Specify Language ..........:.cccccece sees 100 ~=665 
POPrUaNG IN 58 Fea cree eset, nada eeetechn 100 59 
phoenix products 
Pasm86 Macro Assembler Version 2.0 ..........:ccccccseeeees 195 108 
Pdisk Hard Disk & BaCkUp Utility.........c.ssccsseesseseeseee 145 99 
Pfantasy Pac Phoenix COMDO............:0c::cceecereereeees 995 595 
Pfinish Execution Profiler ...........c.cccccccceesesseseesceseeeees 395 209 
Pfix86plus Symbolic DEDUQGES ...........0ccererereteeneee 395 209 
PlorGe Specify C CONICS... <..c0cicsn.-cscsanyonsscelsrcneees 395 209 
PforCe+ + Specify C Compiler and C+ + .......0.000000: 395 209 
Plink86plus Overtay Linker.............ccceseseeeseeeeeeeeees 495 275 
Pmaker Make Utility ..........cc.cccccsccsseeerenseeees Redthes 125 78 
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PINE IMGCID FO CIMOE 55:5 sada cshscsacosstececotesteicceh 195 108 
PIO-D thy oN i Be so) ae 295 154 
pmi products 
EG SHOP AGO coke its eal stiri aes tacccedsstt ces New 49 45 
SH a eae New 149 119 
Oe oc ae Tete art? auc Renee 89 =79 
ONION gg acaba is ks otc vititoancdteac tone ee 89 679 
ROT ies aliens amt heed Geena ora 89 74 
Repertoire/Btrieve Toolkit... New 149 119 
polytron products 
PolyMake UNX-like Make Facility ...........ccccccscsccesseesees 149 129 
PMI oo scandens tho Sseccles Rnatecsatiees Speciad 149 105 
PolyXREF Complete Cross Reference Utility ............0... 219 185 
PVCS Corporate Version Control System...............000+. 395 329 
PWS SNM 2s ek nec date tara ct octane ase csng 149 129 
pop-up reference guides 
Peabody by Copia Intl, Specify Language .............:000 100 #89 
Resident Expert by Santa Rita, Specify Lang ............... CALL CALL 
sco products 
XENIX System V for PS/2.......0....ceeeee New CALL CALL 
NEMIX Systein V 286 3.fi5. o.oo cass aieasdeckencen nee 1295 979 

Development System .....................ccccceeesees 595 479 
Operating System ................:cccccccccsesesseeeseeens 595 479 
Text Processing Package ..................:::0ccccee 195 144 
MENGE Sosa WSB8 ia eee ae 1495 1145 
Development System ............0.0.0...cccccseeeeeeeees 695 589 
Operating System ............0..cccccccccccceeeeseseeees 695 589 
Text Processing Package ..............0...0..cccce 195 144 
Personal Consultant Plus 
by Texas Instruments 
List $2950 Ours $2589 


Designed to take advantage of today’s more powerful 286/386 
DOS- based personal computers, Personal Consultant Plus util- 
izes extended knowledge representation features, and in- 
creased rule capacity. It allows you to use active values, 
meta-rules, browsing capabilities, frame descriptors, PC 
Scheme LISP functions, and an external program interface to C, 
Turbo Pascal, and more. 


software garden products 


Dan Bricklin’s Demo Woo... eee eeeeeeees New 195 179 
Dan Bricklin’s Demo Program.................0.00cccc 7a ae 
Dan Bricklin’s Demo Tutorial...............0..000..0008 50 45 
software connection products 
OBOE FE noi Pes, heme New 199 179 
Ue PE i's. he es nae New 299 249 
dB2c WINDOWS:........h ccdsicansalnnndade New 99 89 
texas instruments 
Arborist Decision Tree Software ..............cccccsecccseseees 595 519 
PE OTe FSG ea I 5 ice ae eas 05. 2077 
Personal Consultant Easy ............0.....c:cccccceereeees 495 435 
Personal Consultant Images ...................0.:0ccc 495 435 
Personal Consultant Online..................0....c:000 995 869 
Personal Consultant Plus.................0.0ccccccecees 2950 2589 
Personal Consultant Runtime....................0...0..0. 95 84 
text editors 

Brief & dBrief Combo from Solution Systems ............. 275 CALL 

Ie oF oe Se he hs ea ee eee 195 CALL 

dBrief Customizes Brief for BASE Ill..........ccccces 95 CALL 
Epsilon Emacs-like editor Dy LUQAMU........c.cccecccereeeees 195 147 
Vedit Plus by CompuView ..........c.ccccccceseeereteteteees 185 128 

FN FOI 25 HEN sac SR aE arene New 285 229 

turbopower products 

TOEBUG PLUS4.0 8 ii ea eS 45 39 

Will! SOUNCe CODE... 2s cevis Siovdiovttadigs ast vate 9 79 
Terie Para 4.0 oi os eae New Version 75 99 
Turbo Professional 4.050.00).c66i. cui linnh ne 99 79 

other products 

ACTOR by The Whitewater GOUD ..........scsceseteseteneneees 495 419 
ApBasic by CompTech Software ........c0cccccceseees New 100 79 
DocuMotion by NWP-Intelligent SolutionS.............. New 160 139 
Heap Expander by The Too! MakePs ...........:0:00000 New 60 959 
Interactive EASYFLOW by Haventree...........:ccccee 150 125 
GA by WAC 23 be Red A New 750 679 
MASTER*KEY by Sharpe Sytem .......ccceeeee New 80 69 
Opt-Tech Sort by Opt-Tech Data Proc ...........::0:00cee 149 99 
Pascal-2 by Oregon SOfWALE ..........cceseeceeeseeeeeeees 295 209 
pcAnywhere by EKD Computer ............0cccceeeees New 99 89 
Source Print by Aldebaran Labs ..........:ccceceeeseeesees 97 —Sss«O74 
SourceTools Make & Vers Cont by Oregon Soft............ 595 479 
Teamwork/PCSA by Cadre Technologies .............0000 995 929 
TeleSwitch by EKD Computer............cccceeeeeee New 289 229 
TLIB Version Control System Dy BUTTON... 100 ~——- 89 
Tmark by Tangent D@SIQNS .........:.cceesesseeeseeesesteeees 80 69 
Tree Diagrammer by Aldebaran LabS .............c.cseees 77~—SsS#S9 
TurboGeometry by Disk SoftWare ..........ccceceeees New 100 89 
XenoCopy-PC by Xensoft ...........sccccececeseseseeesesenees 80 69 
MOGOFOME Hy MEMOSONE.5\.;.4.650005-.-ccccavosasescatsonees New 50 45 


CALL for Additional Products 


FORUM 





Whan that April with his showres 
soote The droughte of March hath 
perced to the roote, And bathed 
every veine in swich licour, Of which 
virtue engendred is the flowr... 
Thanne longen folk to goon on pil- 
grimages, And palmeres for to 
seeken straunge strondes.... 

—Geoffrey Chaucer 

anguage evolves. 

John McCarthy invented the 
LISP programming language almost 
30 years ago, describing its overall 
design in an April 1960 Communica- 
tions of the ACM paper. Since that 
ancient April, LISP has evolved in 
response to new environments: su- 
percomputers, time-sharing systems, 
personal workstations. 

During those decades, LISP main- 
tained a solid reputation for being 
powerful, elegant, and inefficient. Re- 
markably inefficient. LISP code gob- 
bled memory voraciously. LISP pro- 
grams ran slowly, bogged down in 
function calls. That was the percep- 
tion. 

The perception was mainly accu- 
rate. Early compilers for LISP were 
crude and produced “simple and 
often ridiculous code on backing out 
of an execution-order treewalk of 
the program,” according to Richard 
Gabriel, who wrote a book on bench- 
marking LISP implementations (Per- 
formance and Evaluation of LISP Sys- 
tems, MIT Press, 1985). 

Today, though, LISP compilers use 
ali the tricks of the optimizing com- 
pilers for algorithmic languages. 
They convert costly function calls to 
in-line code, delay evaluation and 
rearrange the order of evaluation for 
efficiency, unwind loops, and do 




















































subexpression elimination and inter- 
function optimization. If you think 


languages, as the archetypal symbol- 


processing and number-crunching 
languages, respectively, you might 


152 


peephole optimization and constant 


of LISP and FORTRAN, two ancient 
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be surprised to learn that one mod- 
ern LISP implementation, S-1 LISP, 
produces code for numeric compu- 
tations that rivals FORTRAN code. 

A LISP program is still likely to 
run slower and to use memory less 
efficiently than a comparable C pro- 
gram. But increased memory and 
processing power in current hard- 
ware and continuing improvements 
in LISP implementations make LISP 
more appealing for inclusion in de- 
velopers’ toolkits. This is good news 
because LISP’s virtues—its extensi- 
bility, its expressive power, its facil- 
ity in handling symbolic informa- 
tion—are impressive. 


It's time somebody said it: spell- 
ing checkers are snake oil. In a re- 
cent editorial in another program- 
ming magazine, the editor (let’s call 
him David) congratulated himself on 
the acquisition of a spelling checker, 
which he touchingly expected to 
cure the misspellings that have 
plagued his editorials. The selfsame 
editorial was, of course, plagued 
with the kinds of misspellings that 
spelling checkers don’t check. 

Spelling checkers do not, in fact, 
check spelling at all, and anyone 
who uses one for that purpose has 
been suckered by the snake-oil sales- 
men. If you wart to know how a 
word is spelled, David, you look it 
up in a dictionary. The word lists 
supplied with spelling checkers are 
not dictionaries, whatever their pur- 
veyors may tell you, and can at best 
tell you that there exists a word 
with a certain spelling. Spelling check- 


ers won't stop you from putting that 
damned apostrophe in possessive 
its. The commonest errors are the 
ones they are most likely to ignore. 

Spelling checkers should really be 
called typo catchers because all they 
do is catch certain kinds of typing 
errors. Unfortunately, they don't 
even catch all of these. Consider the 
following mish-mash, which any 
spelling checker would accept un- 
questioningly: “Now is the tome fir 
all god men to sump this sneak oil 
sown the grain.” What kind of error 
checking is it that regularly fails to 
detect the most common errors? 
Sneak oil indeed. 


As you read this, it will have been 
nearly six months since Rob Dicker- 
son made his pilgrimage from the 
Pacific Northwest to the straunge 
strondes of Scotts Valley, California. 
After some wintry blustering, Micro- 
soft and Borland came to an agree- 
ment that put certain short-term con- 
straints on Dickerson’s activities as 
vice president of product manage- 
ment for Borland and also included 
a pact that the two companies 
would not recruit employees from 
one another's ranks for six months. 
Next month, when the moratorium 
on raiding ends and Nature priketh 
them in thir corages, will other folk 
longen to goon? 


MelaD Seradms 


Michael Swaine 
editor-in-chief 


Dr. Dobb’s Journal, April 1988 
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i Introducing 


FRONTRUNNER 


Y =New...for dBASE III PLUS Users! 
Fast...Resident... Powerful. 
FrontRunner offers all this and more! 
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' 
, e CREATE MEMORY-RESIDENT dBASE III PLUS™ 
: PROGRAMS -— FrontRunner™ is the first memory-resident 
‘ applications development tool to contain a large subset of 
: dBASE III PLUS commands and allows you to distribute 
i RunTime™ applications. 

: 

e dBASE II] PLUS DATABASE AND INDEX FILE 


COMPATIBILITY — Allows you to use FrontRunner 


immediately. 


e UNIQUE KEYBOARD FEATURE - Bind commands or entire 


programs to a single Hotkey for rapid execution from within other 
applications. 





ri 
\ 
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e PASTE COMMAND - This powerful command allows you to 
extract data from your dBASE III PLUS files and paste it into 
your spreadsheet or word processing application. 


Buy FrontRunner by June 30, 1988 and get a FrontRunner version of RunTime and an unlimited RunTime license for 
royalty-free applications. FrontRunner is not copy-protected and comes with a 30-day money-back guarantee. 
The suggested retail price is $195. 


See your local Ashton-Tate dealer now. For more information, or the name of the dealer nearest you, 


call (800) 437-4329, Ext. 556.* 
*In Colorado, call (303) 799-4900, Ext. 556. 


A 


ASHTON: TATE 


ion: Software Corporation. 
= Ashton-Tate | Ashton-Tate Corporation; FrontRunner | Apex 
Trademarks | owner: easel E> Be hes ee Corporation. All rights reserved. 
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Whatever dialect of IBM you need to speak, 
CROSSTALK® Mk. 4 makes the connection. 


Now, one program does the job that used to require several. 
— ™ #CROSSTALK® MK. 4 allows high-speed direct communications 
-_ _ between PCs and minicomputers, or (with an IRMA™ board) 
" \ __ between your PC and an IBM Mainframe, or (with Smart Alec™) 
-_ _ between your PC and IBM System 3x’s. If you like, CROSSTALK 
'_.__ can support all of these sessions (and others) simultaneously, 
and display each session in its own window. 
CROSSTALK Mk. 4 emulates all the terminals you're likely 
to find useful. That includes IBM 3101 (page and character 
modes), IBM 525x, IBM 529x, IBM 327x, as well as many 
popular async terminals like the DEC VT100 and VT220 
serieés. CROSSTALK Mk. 4 includes the powerful CASL™ 
programming language, which allows you to automate 
communications applications quickly and casily. 
So if you're used to thinking of CROSSTALK just to 
use with a modem, you’re missing some important 
connections. Ask your dealer for details. or write: 


~ Digital Communications Associates. Inc. 
1 Holcomb Woods Parkway / Roswell, Georgi 7 
1-800-241-6393 ae 


CROWTALK™ 


—————— NAES ALS 
COMMUNICATIONS 
WE 





